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INTRODUCTION 

The only authorized IBM agency in the 
United States for the distribution of 
programs to IBM us ers is the DP Program 
Information Department, 40 Saw Mill River 
Road, Hawthorne, New York 10532. 

PROGRAMS AVAILABLE FROM PID 

IBM makes available a wide variety of 
programs for IBM systems . This catalog 
contains a list of available programs 
categorized as Type I, II, III, and IV 
programs . 

TYPE I AND II PROGRAMS 

Type I and II programs are programs which 
have been subjected to formal testing. 
All Type I and II programs have been 
assigned a Service Classification. For 
information concerning Service 
Classifications, contact your IBM Branch 
Office. Most Type I and all Type II 
programs were available for delivery from 
the Program Information Department prior 
to June 23, 1969. 

TYPE III AND IV PROGRAMS 

Type III programs have been submitted by 
one or more IBM employees . They are 
programs of general interest submitted 
for unrestricted distribution. They have 
met a basic set of programming and 
documentation standards but are not program 
tested in any formal fashion by the IBM 
Corporation. The user is expected to make 
the final evaluation as to the usefulness 
in his own environment. These programs 
were available for delivery from the Program 
Information department prior to June 23, 
1969. 

IBM MAKES NO WARRANTY, EXPRESS OR IMPLIED, 
INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 
WARRANTIES OR MERCHANTABILITY AND FITNESS 
FOR A PARTICULAR PURPOSE AS TO THE 
DOCUMENTATION, FUNCTION OR PERFORMANCE 
OF THESE PROGRAMS. 

Systems Engineering Service (charge basis) 
is available from your IBM Branch Office 
to assist you with the installation, 
modification or any technical assistance 
required for use of this program. 

Type IV programs are those contributed 
for unrestricted distribution by one or 
more authors of which at least one is an 
employee of an IBM customer. They are 
made available by IBM essentially in the 
author's original form, but conform to 
published Type IV standards. IBM exercises 
no control over the technical content of 
the documentation but merely assures that 
the quality of reproduction is 
satisfactory. Type IV programs have not 



been tested by IBM. The user is expected 
to make the final evaluation as to their 
usefulness in his own environment. 

IBM MAKES NO WARRANTY, EXPRESS OR IMPLIED, 
INCLUDING, BUT NOT LIMITED TO, THE IMPLIED 
WARRANTIES OF MERCHANTABILITY AND FITNESS 
FOR A PARTICULAR PURPOSE AS TO THE 
DOCUMENTATION, FUNCTION OR PERFORMANCE 
OF THESE PROGRAMS. 

TYPE III PROGRAMS WITH 
SERVICE A CLASSIFICATION 

Type III programs which were given Service 
A Classification, perform functions which 
may be fundamental to the operation and 
maintenance of the user's system. These 
programs have not been subjected to formal 
test by IBM. 

Until reclassified, IBM will provide for 
these Type III programs with the following: 
(a) Central Programming Service including 
design error correction and automatic 
distribution of corrections; (b) Field 
Engineering Programming Service including 
design error verification, Authorized 
Programming Analysis Report (APAR) 
documentation and submission, and 
application of Program Temporary Fixes 
or development of an emergency by-pass 
when required. 

IBM does not guarantee service results 
or represent or warrant that all errors 
will be corrected. The user is expected 
to make the final evaluation as to the 
usefulness of these programs in his own 
environment. 

THE FOREGOING IS IN LIEU OF ALL WARRANTIES, 
EXPRESS OR IMPLIED, INCLUDING, BUT NOT 
LIMITED TO, THE IMPLIED WARRANTIES OF 
MERCHANTABILITY AND FITNESS FOR A PARTICULAR 
PURPOSE. 



IBM CATALOGS OF PROGRAMS 

Abstracts and ordering instructions for 
all programs available from PID are found 
in the IBM Catalogs of Programs and their 
Supplements , published periodically by 
PID. These Catalogs are available from 
the Mechanicsburg Distribution Center as 
follows: 

CATALOG SUPPLEMENT 



SYSTEM 

1240/1401/1420 
1440/1450/1460 

700 Series, 1410, 
7000 Series 



FORM FORM 

NUMBER NUMBER 

GC20-1601 GN20-0013 



GC20-1602 GN20-0014 



ill 



1620/1710 



GC20-1603 GN20-0015 



COMPLETION OF THE IBM PROGRAM ORDER FORM 



System/360 Models 25 GC20-1619 GN20-0030 
and above . 



1130/1800 
Model 20 



GC20-1630 GN20-0031 
GC20-1691 GN20-1852 



PID ORDER PROCESSING TURN-AROUND TIMES 

The normal elapsed time which can be 
anticipated from the time the program order 
is shipped to PID till the time the order 
is received may be calculated from the 
following table: 



ACTION 



TIME IN DAYS 



Order sent to PID Average - 4 calendar days 

in transit 



Order processed 
at PID 

Order sent from 
PID 



Maximum - 8 working days 
at PID 



Maximum 



4 calendar days 
in transit 



Thus, a three-week cycle should be planned 
for when ordering programs from PID. 

PID SHIPPING METHOD'S 

PID uses three methods to ship program 
packages, depending on destination, weight 
and urgency. This information may be 
worthwhile to users who send magnetic 
volumes to PID. 

1. United Parcel Service (air and 
land) is used whenever possible. 

2. U.S. Mail is used for 
destinations beyond United Parcel 
territories . Fourth Class 
Special Delivery is the level of 
service chosen because it 
provides service comparable to 
First Class (4 days maximum to 
any location in the continental 
United States) at a much lower 
rate. Special Handling Service 
it should be noted, is not the 
same as Special Delivery 
Service, and is not as fast. 

PID insures Fourth Class 

Special Delivery shipments 

to provide a means for tracing 

shipments. A signature at 

the destination is a requirement 

for insured packages. 

3. Air Freight service is used for 
expedited shipments. To 
metropolitan centers, overnight 
delivery can usually be expected. 
Two day delivery to locations 
more than 50 miles from a major 
airport is normal. 



INTRODUCTION 

The IBM Program Order Form (120-1957) is 
to be employed for all orders submitted 
to PID for Type I, II, III, IV and Prior 
Use programs and for communications with 
PID relative to the establishment, 
modification and deletion of PID user 
profiles. This is the ONLY form to be 
used for these purposes. 

The IBM Program Order Form is a 3-copy 
form. Copy 3 is retained by the user. 
Copies 1 and 2 should be forwarded to the 
IBM Branch Office. After completing Section 
5 (see below) , the Branch should forward 
Copy 1 to PID and retain Copy 2 for 
reference purposes. 

THE IBM PROGRAM ORDER FORM CONTAINS 5 
SECTIONS : 

- Section 1 , Program Package 

Identification, is used to 
describe the program 
material required. 

- Section 2, Customer and Order 

Identification, MUST ALWAYS 
BE COMPLETED. 

- Section 3, User Volume Information, is 

completed when the order 
requires the submission of 
user volumes. 

- Section 4, User Registration, is 

completed to register a new 
PID user, or to modify or 
delete a user registration. 

- Section 5, For IBM Use, MUST ALWAYS BE 

COMPLETED by an IBM 

representative . 
Instructions for the completion of each 
section are given below. Refer to the 
sample form (Figure!) presented at the 
end of this discussion. 

SECTION 1 PROGRAM PACKAGE IDENTIFICATION 

This section is used to describe the program 
packages being ordered. The instructions 
which follow, apply to ordering all programs 
described in this catalog. 

A program is packaged and distributed under 
one program number (e.g., 7090-PR-130, 
1410-PR-155, 1620-01.6.145, 1440-UT-041, 
etc.) and is fully specified by entries 
in Columns 1-24 ON ONE LINE of Section 
1. A total of 25 ordering lines have been 
provided on the order form. If more than 
25 lines are required, the order may be 
continued on a second form and then a 
third, etc. 

COLUMN I BASIC OR OPTIONAL MATERIAL 

The requester specifies , in Column 1 , 
whether the basic or optional program 
package is required. If both the basic 
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and the optional program packages are 
required, they must be described separately, 
on separate lines of the form. The contents 
of these program packages are described 
in the abstracts in this manual. 

ENTER B or 

COLUMN 2 MACHINE READABLE 

The requester specifies, in Column 2, 
whether or not he wishes the machine 
readable portion of the program package. 

ENTER Y or N 

COLUMN 3 DOCUMENTATION 

The requester specifies, in Column 3, 
whether or not he wishes the documentation 
portion of the program package. PID will 
send one copy of the basic documentation 
associated with each Type I and II program 
ordered, if the documentation is requested. 
Requests for ONLY the documentation for 
Type I and II programs, when the machine 
readable material is not ordered, should 
be sent to the Mechanicsburg Distribution 
Center by the IBM Branch Office (use 
Publication Requisition #MO2-0618-4) . 
Also, requests for multiple copies of 
documentation for Type I and II programs 
should be requested through the IBM Branch 
Office. 

PID will honor "documentation only" requests 
for Type III and IV programs and also 
requests for multiple copies for Type III 
and IV program documentation, up to 3 
copies. If more than 3 copies are required, 
the user may reproduce copies locally 
(provided this material is not copyrighted) . 

ENTER or 1 for Type I and II 

Programs 
ENTER 0, 1, 2 or 3 for Type III and 

IV Programs 

COLUMNS 4- 13 PROGRAM NUMBER 

The exact Program Number, as specified 
in the ordering information portion of 
the Catalog of Programs abstract should 
be entered in this field. 

ENTER the Program Number (e.g., 
7040SI141) in columns 4-12 
or columns 4-13, as the 
length requires. Omit all 
special characters such as 
decimal points or hyphens . 



COLUMNS 15-20 



PROGRAM NUMBER EXTENSION 



The Program Number Extension is used in 
conjunction with the Program Number to 
completely and uniquely identify orderable 
Types I, II, III, IV and Prior Use Programs 
Program number extensions pertinent to 
a given program number are described in 



the ordering information portion of the 
Catalog of Programs abstract for that 
program. Whenever a program number requires 
a program number extension, IT MUST BE 
ENTERED in Columns 15-20. 

ENTER as specified in the Catalog 
of Programs abstract (left 
justify) . 

COLUMN 14 ACTION CODE (TYPE I AND II 

BASIC PROGRAM PACKAGES ONLY) 

Column 14 provides the user with the means 
to maintain his PID profiles for Type I 
and II programs in order to make most 
effective use of the Program Update Service. 
There are 2 specific actions requiring 
an entry in Column 14. COLUMN 14 SHOULD 
BE LEFT BLANK IN ALL OTHER CASES. These 
two actions are: 

1. ORDER AN ANNOUNCED MAINTENANCE PACKAGE 

Users of record receive announcements of 
the availability of orderable maintenance 
packages for programs automatically from 
PID. 

Users wishing to order an announced 
orderable maintenance package may do so 
as follows: 

ENTER M in Column 14 

The program number and any applicable 
program number extension which is identified 
in the announcement material must be entered 
in Columns 4-13 and 15-20 respectively. 
The remainder of Columns 1-24 must also 
be completed as applicable. 

2 . DELETE A TYPE I OR II PROGRAM FROM THE 
USER PROFILE 

Through the Program Update Service, PID 
makes extensive distributions of machine 
readable material and documentation to 
all users of record of all Type I and II 
basic programs. It is essential that the 
PID profiles be kept up to date to 
facilitate the distribution of this material 
to active users as well as to avoid the 
distribution of this material to 
installations no longer using previously 
ordered Type I and II programs. 

A Type I or II program previously ordered, 
which is no longer being used, may be 
deleted from the PID profile as follows: 

ENTER D in Column 14 

The program number and any applicable 
program number extension must be entered 
in Columns 4-13 and Columns 15-20 
respectively. No other entries in columns 
1-24 are required. 

COLUMNS 21-22 DISTRIBUTION MEDIUM CODE 



(See Table Below) 

The media on which each Type I, II, III, 
IV and Prior use program is available from 
PID and the codes to be used, in Columns 
21-22, to specify the desired media are 
identified in the Catalog of Programs 
abstract for each program. 

ENTER the selected medium code. 

MEDIUM CODE TABLE 

TYPE DESCRIPTION CODE 

DTR* Medium defined by PID 

user profile 00 

PT 8 channel paper tape. 05 
CARDS 80 column punched cards . 15 
7/556 Magnetic tape recorded 22 

at 7 track, 556 cpi. 
7/800 Magnetic tape recorded 24 

at 7 track, 800 cpi. 
7DC/800 Magnetic tape recorded 26 

at 7 track, 800 bpi. 

Data convert feature 

required. 
9/800 Magnetic tape recorded 28 

at 9 track, 800 bpi. 
9/1600 Magnetic tape recorded 29 

at 9 track, 1600 bpi. 
1316 1316 Disk Pack. 52 

2316 2316 Disk Cartridge 57 

2315 2315 Disk Cartridge. 58 

2316 2316 Disk Cartridge. 57 

NOTE 1: DTR* 

Card programs will be distributed 
on DTR's (Distribution Tape Reels) 
to card users with magnetic tape 
capability as indicated on the PID 
user profile (See Section 4). These 
programs will be distributed in card 
form to users with no magnetic tape 
capability. Whenever possible, 
multiple card programs ordered 
together will be stacked on one or 
more DTR's. A retriever will be 
placed at the beginning of each DTR, 
enabling the user to selectively 
punch out the programs stacked on 
the DTR. Card programs which will 
be volume shared as described above 
are identified by DTR* in the 
ordering information portion of the 
Catalog of Programs abstracts. The 
user may establish or modify the 
profile entry describing his 
magnetic tape capability through 
the use of Section 4 of the Program 
Order Form. 

NOTE 2: Types I, II, III, IV and Prior Use 
program orders require the user to 
specify a medium code. However, in 
the absence of a medium code, a 
default option is exercised by PID 
under the following circumstances. 

. All distribution media for the 
program package in question 



(Basic or Optional) must be 
magnetic tape. 

. User volume requirements for the 
program package in question 
(Basic or Optional) must be the 
same for all tape types. 

. The default medium must be one of 
the recording densities available. 

The default options are: 

. For programs available on 7/556 
cpi and 7/800 cpi, 7/800 cpi will 
be supplied. 

. For programs available on 7DC/800 
cpi, 9/800 bpi, or 9/1600 bpi, 
9/800 bpi will be supplied. 

COLUMNS 23-24 USER VOLUMES REQUIRED 

When the programs ordered require the 
submission of user volumes (2400' magnetic 
tape reels and/or disk devices) the number 
of user volumes for each program, as 
specified in the Catalog of Programs 
abstract, is entered in Columns 23-24 and 
Section 3 of the order form is to be 
completed. 

ENTER the number of user volumes required 
for the medium type selected. The number 
should be entered as two digits (01, 02, 
etc . ) 

SECTION 2 CUSTOMER AND ORDER IDENTIFICATION 

CUSTOMER NUMBER 

Enter the 7-digit Customer Number in the 
space provided ON EVERY IBM PROGRAM ORDER 
FORM SUBMITTED TO PID. Do not use dashes. 
Do not use the shaded area unless previously 
advised to do so. The Customer Number 
MUST BE ENTERED CORRECTLY because the user 
profile maintenance and the address to 
which the ordered program material will 
be shipped by PID will be determined from 
this number for all registered PID users 
(See Section 4). Once registered with 
PID, users are not required to enter their 
name and address on the order form. 

ORDER NUMBER 

This number is pre-printed on each form. 

PAGE - OF - 

If only one form is needed to specify the 
program order , enter "1 of 1 " . When more 
than one form is needed, number the forms 
"1 of n" "2 of n"... "n of n". Enter the 
CUSTOMER NUMBER ON EVERY FORM, and staple 
the forms together when sending to PID. 



SECTION 3 



USER VOLUME INFORMATION 



VI 



The total number of user volumes (2400* 
magnetic tape reels, disk packs or 
cartridges) required to fill the program 
order, as identified program by program 
in Columns 23-24 of Section 1, should be 
accounted for in this section. These 
volumes may either be forwarded to PID 
or ordered from the appropriate IBM 
location. Complete Section 3 by entering 
the number of 2400* magnetic tape reels 
forwarded or ordered, the seriai numbers 
of disk devices forwarded, or the plant 
order number, quantity and scheduled 
shipping dates of the disk devices ordered 
from San Jose. 

Copy 1 of the IBM Program Order Form should 
accompany user volumes forwarded to PID. 
User volumes forwarded to PID should be 
externally labelled as follows: 



2400' MAGNETIC 
TAPE REELS 

1. Customer Number 

2. *Order Number 
(Preprinted) 



It is suggested 
that tape reels 
be of the aluminum 
hub variety and 
the tape secured 
by a tape end 
retainer 



DISK PACKS/ 
CARTRIDGES 

1. Customer Number 

2. *Order Number 
(Preprinted 

3. Disk serial number 

Disk packs should be 
shipped in the 
standard disk pack 
containers (Part 
#7350520) . 

Disk cartridges should 
be shipped in the 
standard cartridge 
container (Part 
#7350600) . 



* If multiple Program Order forms are 
required to complete the program order, 
enter the preprinted Order Number from 
the FIRST FORM on all user volume labels. 

In lieu of forwarding tape reels to PID, 
reels may be purchased in conjunction with 
ordering programs . To purchase magnetic 
tape reels, Part #7035113 (10 1/2" diameter 
2400' reel, 3200 FCI, total surface tested, 
clear front, blue back, solid flanges), 
contact the IBM representative who can 
order them directly from PID by sending 
a completed copy of the Magnetic Tape Order 
Form #170-1138 to PID together with Copy 
1 of the Program Order Form. Part #7035113 
is the only part number PID carries. If 
different tape reels are desired the IBM 
representative must send orders for them 
with Copy 1 of the Program Order Form to 
the Boulder Tape Center. The Tape Center 
will forward the reels and the Program 
Order Form to PID. This procedure will 
of course extend total turnabout time and 
delay receipt of the program. 

Disk packs and disk cartridges may be 
ordered from San Jose in conjunction with 
ordering programs. Contact the IBM 
representative for assistance. Copy 1 
of the Program Order Form should be sent 



directly to PID. Upon receipt of the 
volumes, PID will fill the order in the 
normal manner. 

SECTION 4 USER REGISTRATION 

Section 4 is completed to register a new 
PID user and to modify or delete previous 
registrations. Each user must be registered 
with PID prior to, or simultaneously with, 
his first program order. Once the user 
is registered Section 4 NEED NOT BE 
COMPLETED AGAIN until the registration 
data requires modification or deletion. 

ACTION CODE 

R: REGISTER a new PID user. All blocks 
of Section 4 must be completed. 

M: MODIFY a previous registration by 
changing any or all blocks in 
Section 4. Each block modified must 
be completely respecified. Thus, a 
permanent change in the "Attention 
To" line of the user's name and 
address requires re- specification of 
the entire "Ship To" Information block 
of Section 4. The other blocks are 
left blank . 

Ds DELETE a previous registration. This 
action causes the deletion of the 
entire user profile (identified by 
the 7-digit Customer Number entered 
in Section 2) from the PID files. 
No other information is necessary. 

S: SPECIAL "Ship To" this order only. 
This action causes a "Ship To" 
Information substitution for this 
order only. The "Ship To" Information 
block must be completely specified. 
All other blocks are left blank. 
The permanent user registration data 
is not affected. 

DP BRANCH OFFICE NUMBER/IBM LOCATION 

Enter the IBM DP Branch Office number for 
the IBM customer or DP Branch Office user. 
Enter the IBM division, location and 
department codes for IBM users . 

MAGNETIC TAPE CAPABILITY 

As stated in Section 1 (Columns 21-22) 
Card programs will be volume shared for 
distribution on Distribution Tape Reels 
(DTR's) to Card users with magnetic tape 
capability. These DTR's will have a 
retriever placed at the front to enable 
the user to punch the programs out 
selectively. Enter here the preferred 
tape recording mode (trackage and density) 
for these volume shared DTR's . Check "None 
of These" if not a Card user. 

"SHIP TO" INFORMATION 
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Enter the complete shipping address. Do 
not use only a Post Office Box number since 
PID uses carriers other than the U. S. 
Mail. The ZIP CODE must be provided. 
In the "Attention To" line, if at all 
possible, enter a position title or 
department name /number, rather than the 
name of an individual. 

SECTION 5 FOR IBM USE 

IBM CONTACT 

Enter the last name and telephone number 
of the IBM representative familiar with 
the order. If the representative can be 
reached on the IBM network, enter NET and 
the correct seven-digit number. PID will 
call this person should clarification of 
any of the information on the Order Form 
be required. 

IBM MANAGEMENT SIGNATURE 
Each order should be signed by a member 
of Branch management or, in the case of 
internal IBM users, by the department 
manager. The order form should be dated 
(MM DD YY) and the Branch Office/Department 
number entered. 

IBM WORLD TRADE USERS 

World Trade users should order programs 
by contacting their IBM representative. 

KEYWORD- IN-CONTEXT (KWIC) INDEX 

The Keyword-in-Context Index lists all 
available programs by their search words 
and keywords. Search words are significant 
words that describe the program but do 
not appear in the title. Keywords are 
significant words which appear in the 
program title. 

Each search word and each keyword is listed 
alphabetically in a column of the index. 
Their respective context words are printed 
to the right of the search word or keyword. 
There is an index entry for each search 
word and keyword. Certain words are not 
accepted as indexing words . They are 
considered to be too general to be useful 
for retrieval purposes and are therefore 
prevented from indexing. Hyphenated words 
are treated as one index word, with only 
the first word being significant. Figure 
2 illustrates the operation. 

Note that the # sign always precedes the 
first word of the title. An * sign precedes 
a search word. Each print line in the 
KWIC Index contains *»3 positions. A search 
word group or title that is longer than 
43 positions will show only the words that 
fall to the right of the search word or 
keyword being highlighted, up to the limits 
of one line. The remaining words become 
a separate entry on a different line. 
The + sign at the end of a line indicates 
there are more words in the search word 



group or title than are shown. The complete 
title may be found in the title section 
of the program abstract. 

PROGRAM CLASSIFICATION CODES 

Classification codes represent areas of 
function of application to which programs 
apply. Included below is a complete listing 
of classification codes for all types of 
programs and for each system included in 
this Catalog. 

PROGRAMMING SYSTEMS TYPE I 

/AD/ Autochart 

/AS/ Assembly Systems 

/AT/ Automatic Test 

/AU/ Autocoder 

/CB/ COBOL - Common Bus. Oriented 

Language 

/CT/ Commercial Translator 

/CV/ Conversion Programs 

/DN/ Diagnostic Programs 

/FO/ FORTRAN - Formula Translation 

/IO/ Input/Output 

/LM/ Library Material 

/MI/ Miscellaneous 

/PR/ Processor - Includes AU, CB, 

I/O, etc. 

/RG/ Report Generators 

/SI/ Simulator Programs 

/SM/ Sort /Merge 

/SP/ Symbolic Assembly Programs 

/SV/ Supervisory Systems 

/UT/ Utility Programs 

APPLICATION PROGRAMMING TYPE II 

Distribution 
/DP/ Publishing 
/DR/ Retail 
/DW/ Wholesale 

Fabrication and Assembly 

/CN/ Numerical Control Applications 

/CX/ Other 

/EE/ Electrical Engineering 

/EO/ Optics 

/EX/ Other 

/ME/ Electrical Machinery 

Process 

/MP/ Petroleum and Industrial 

Chemicals 
/MT/ Textiles and Paper 

Service Industries 

Finance 

/FB/ Banking 

/FI/ Brokerage and Investment 

Information Retrieval 

/CR/ Information Retrieval 

Insurance 

/IF/ Fire and Casualty 

/IL/ Life 



VIII 



State and Local Government 

/UG/ Government, State and Local 

Transportation 

/ST/ Transportation 

Uti li ties 

/SU/ Utilities 

Federal Region 

/GP/ Government, Federal 

Scientific Industries 

Aerospace 

/MA/ Aerospace 

Education 

/US/ Secondary Schools 

Medical 

/UH/ Hospital and Medical 

Scientific Marketing 

/CA/ Statistical Applications 

/CO/ Operations Research 

/CP/ Critical Path Scheduling 

/CM/ Mathematical Applications 

/EC/ Civil Engineering 

/MF/ Fabrication and Primary Metals 

Cross Industry 

Communications 

/SC/ Communications 

Simulators 

/CS/ Simulators 

Systems Engineering 

/SE/ Systems Engineering Techniques 

TYPE III AND TYPE IV PROGRAMS 

IBM 1620 Data Processing Systems 

Utility Programs 

1.1 Assembly and Optimizing 

1.2 Loading 

1.3 Punching 

1.4 Tracing 

1.5 Tape Handling 

1.6 Miscellaneous General Purpose 

Interpretive Programs 
Mathematical Functions 
Differential 6 Integral Equations 
Matrix Programs 
Statistical Programs 
Mathematical Routines 

Physical Sciences 

9.1 Aeronautical 

9.2 Civil 

9.3 Chemical 



1.0 



2.0 
3.0 
4.0 
5.0 
6.0 
7.0 
8.0 



9.4 Electrical 

9.5 Mechanical 

9.6 Petroleum 

9.7 Other 

Management Science 

10.1 Linear Programming 

10.2 Simulation 

10.3 Other 

10.4 Numerical Control 

Demonstration Program 
Control Systems 
Unclassified 

USING THE CATALOG 



10.0 



11.0 
12.0 
13.0 



To locate a program begin by thinking of 
the significant words describing the desired 
program. Then look in the KWIC, Keyword- 
in-Context, Index for the keyword entry. 
The page number adjacent to the file number 
will then direct you to the corresponding 
program abstract. The reference code is 
set up as follows: 



System 

WT5 

1410 

The number of the 
IBM system for 
which the program 
is written. 



File No. 
AT-0 82 
11.9.001 

The IBM Library 
code for filing 
and ordering a 
program. 



Now refer back to the illustration in the 
section entitled, "Keyword- in-Context 
Index". As you can see, there are two 
kinds of file numbers: The first consists 
of an alphabetical and numeric reference; 
the second is completely numeric in a Dewey 
Decimal sequence. 

Type I and II program abstracts are located 
in the "IBM Programs" section of this 
Catalog; Type III and IV program abstracts 
are located in the "Contributed Programs" 
section. 

The page number listed at the end of the 
KWIC entry line will direct you to the 
program abstract. Each abstract describes 
the relevant program in enough detail to 
help you determine if the program will 
meet your requirements. 

LIST OF NEW PROGRAMS 

This section consists of a list of new 
Programs added since the last edition of 
the Catalog or its Supplements . All new 
Type III and IV Programs which appear in 
this catalog were accepted prior to December 
31, 1969. 

PROGRAM CORRECTIONS AND REVISIONS 

There are two kinds of revisions to programs 
listed in this Catalog: 
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1. Changes in the program abstract, 

2. Functional changes in the program 
documentation and/or machine readable 
material. 

Abstract changes for all Types of programs 
are noted in this Catalog and in the 
Supplement. The following codes appear 
at the extreme right-end of the title line 
for each abstract that is new or has been 
revised in this edition: 

*N - This symbol indicates a new program. 
*M - This symbol indicates that the 

text of the abstract has been 

modified. 

Functional changes in program documentation 
and/or decks or tapes for Type III (IBM 
Contributed) and Type IV (Customer 
Contributed) programs are listed in a 
special table preceding the KWIC Index. 
This data is listed under four headings: 
machine area; order number; date the 
correction was effective; and material 
changed. If a user has received the program 
data prior to the date indicated and would 
like to receive the correction, he must 
reorder the program. See the section 
entitled, "Completion of the IBM Program 
Order Form". All corrections and revisions 
which appear in this catalog were accepted 
prior to December 31, 1969. 

Information concerning functional changes 
in program documentation and/or machine 
readable material for Type I (Programming 
Systems) and Type II (Application Programs) 
can be obtained through your IBM Branch 
Office. 

DELETED TYPE I, II, III, AND IV PROGRAMS 

Deleted Types I, II, III and IV programs 
are announced in each Catalog or Supplement 
in the table entitled "List of Deleted 
Type I, II, III and IV Programs". 

Catalogs will contain a list of all deleted 
programs , including those contained in 
all previous supplements , that have been 
deleted since the last published catalog. 
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LIST OF NEW TYPE III AND IV PROGRAMS 



All programs which appear on this list were accepted prior to December 31, 1969. 
PROGRAM NO. PROGRAM TITLE PAGE NO. 



1620-01.6.160 
1620-02.0.066 



LABELR - A REPORT GENERATOR 
A MODIFIED PDQ FORTRAN SYSTEM 



030 
037 



1610-01.1.002 
1620-01.1.030 
1620-01. 1.034 
1620-01.1.036 
1620-01.2.015 
1620-01.2.018 



DELETED TYPE I, II, III, AND IV PROGRAMS 

The following programs were deleted because of low usage: 

PROGRAM NO. PROGRAM TITLE 

ADDITIONAL INSTRUCTION MACRO SUBROUTINE 

NELIAC COMPILER 

DEFT DISK EXECUTION OF FORTRAN TRANSFER 

DDSR - DISK DATA STORAGE ROUTINE 

GOTAFIT - GOTRAN AND AFIT FORTRAN FOR MONITOR I SYSTEM 

1620/1311 FORTRAN II-D SUBROUTINE PRE-READ AND COLUMN TEST 

MONITOR 1 SUBSET 1 

01.3.00 8 FORTRAN COMPRESSOR AND 75 COLUMN DUMP 
01.3.012 GENERAL GANG-PUNCHING PROGRAM 

01.4.001 SELECTIVE TRACE 
01.4.0 27 FORTRAN PROGRAM STRAIGHTENER 
01.6.019 FORTRAN II DIAGNOSTICIAN 
01.6.043 LOGGING PROGRAM 

01.6.0 45 FORTRAN COMPRESSOR AND MULTI-PROGRAMMER 

01.6.0 53 SPS FLOATING POINT CONVERSION SUBROUTINES 

01.6.070 CARD SEARCHING PROGRAM, CS3 

01.6.090 CLEAR AMD LOAD 20K 

01.6.098 GENERAL COMPRESSOR PROGRAM 

01.6.099 SELECTIVE CARD REPRODUCER 
01.6.119 REPRODUCER (OR RESCUE, I.E. REPRODUCE, EMIT, AND SEQUENCE 

ON CUE) 

01.6.121 TNF AND TNS SIMULATION SUBROUTINES 

01.6.122 FACT-FINDER - A GENERAL CLASSIFICATION PROGRAM 
01.6.137 DISK PACKER 

01.6.144 PART - PROCESSOR AND RESULT TESTER 

01.6.145 PICTURE OF DISK PACK 
01.6.157 TNS, TNF, AND MF MACRO SUBROUTINES 
02.0.011 INTERPRETIVE SYSTEM FOR PERFORMING OPERATIONS WITH COMPLEX 

NUMBERS 

02.0.017 UTO FORTRAN PROCESSOR AND SUBROUTINES 

02.0.0 35 CARLETON BINARY SIMULATOR 

02.0.036 BG - UTO FORTRAN. 

02.0.038 CARLETON COLLEGE COMPILER 

02.0.044 SINGLE AND MULTIPLE LINEAR REGRESSION ANALYSIS PROGRAM /CARD/ 

2.0.0 49 PDQ THIRD ALTERNATE SUBROUTINE 

02.6.053 JANET - DIGITAL ANALOG SIMULATION PROGRAM 

02.0.054 JANET - II - DIGITAL ANALOG SIMULATION PROGRAM 

02.0.055 PDQ FORTRAN COMPRESSOR 

02.0.056 FHPS-5 (1620 VERSION) 

02.0.059 C4D - AN OPERATING SYSTEM FOR PDQ FORTRAN 

02.0.061 PDQ FORTRAN DISK SYSTEM FOR 1620 

02.0.065 INSPEC - INVESTIGATE NUMERICALLY STUDENTS PROGRAM EXECUTE 

AND CONTROL 

03.0.001 VARIABLE FIELD SQUARE ROOT SUBROUTINE 

03.0.009 REAL ROOTS OF CUBIC POLYNOMIALS 

4.0.006 SOLUTION OF N SIMULTANEOUS FIRST - ORDER DIFFERENTIAL 

EQUATIONS 

05.0.008 SIMULTANEOUS EQUATIONS A LA KING 

5.0.0 28 MULTIPLICATION OF MATRICES WITH VARIABLE LENGTH MANTISSA 

06.0.003 SCRAP/SIXTEEN - TWENTY CARD REGRESSION ANALYSIS PROGRAM 

06.0.031 STEPWISE REGRESSION (MODIFICATION OF BIMDO 9) 

06.0.0 37 MATRIX INVERSION AND SOLUTION OF SIMULTANEOUS LINEAR 



1620- 
1620- 
1620- 
16 20- 
1620- 
1620- 
1620- 
1620- 
1620- 
1620- 
1620- 
1620- 
1620- 

1620- 
16 20- 
1620- 
1620- 
1620- 
1620- 
1620- 

1620- 
1620- 
1620- 
1620- 
1620- 
1620- 
1620- 
16 20- 
1620- 
1620- 
1620- 
1620- 
1620- 

16 20- 
1620- 
1620- 

1620- 
1620- 
1620- 
1620- 
1620- 
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PROGRAM NO. PROGRAM TITLE 



EQUATIONS 
1620-06.0.043 CONTINUOUS FOREST INVENTORY STATISTICAL CHECK PROGRAM 
1620-06.0.067 LINEAR REGRESSION (TWO VARIABLES) LEAST SQUARES FIT 
1620-06.0.126 AUTOCORRELATION AND SPECIAL ANALYSIS FOR A 20K 1620 
1620-06.0.128 COMPUTATION OF THE CUMULATIVE BINOMIAL POISSON NORMAL 

STUDENT T/CHI - SQUARE F PROBABILITIES 
1 620-06. 0.143 80 - SERIES MULTIPLE LINEAR REGRESSION SYSTEM (CARD) 
1620-06.0.145 CORRELATION MATRIX WITH OPTIONAL FACTOR ANALYSIS AND 

ROTATION OF FACTORS 
1620-06.0.148 SINGLE AND MULTIPLE LINEAR REGRESSION ANALYSIS PROGRAM /CARD/ 
1620-06.0.157 FOUR TYPE POLYNOMIAL CURVE FITTING BY LEAST SQUARES 
1620-06.0.164 INVERSE LAPLACE TRANSFORM 
1620-06.0.166 AUTOCORRELATION - SPECIAL ANALYSIS 
1620-06.0.184 MULTIPLE LINEAR REGRESSION 
1620-06.0.201 TAXONOMY PROGRAM FOR CLASSIFYING ITEMS DESCRIBED BY 

QUALITATIVE PROPERTIES 
1620-06.0.20 2 1 TO 4 WAY ANALYSIS OF VARIANCE WITH REPEATED MEASURES AND 

UNEQUAL SUBSET CELL FREQUENCY 
1620-06.0.203 HUNT - HOFSTRA UNIVERSITY NONPARAMETRIC TESTS 
1620-06.0.216 STATISTICAL PROJECT ORGANIZER FOR TEACHING 
1620-06.0.225 GENERAL PURPOSE ANALYSIS OF VARIANCE SYSTEM 
1620-06.0.250 TRANSFORMATION TO CHECK AND INCREASE LINEARITY IN DATA 
1620-06.0.252 1620 GENERAL PROGRAM APBE - ANALYSIS OF PLACKET - BURMAN 

EXPERIMENT 
1620-06.0.253 PORTA - A GRADING PROGRAM 
1620-07.0.002 POLYNOMIAL CURVE FITTING 
16 20-0 7.0.015 FORTRAN SYSTEM RELOCATABLE SUBROUTINE FOR GENERATING 

(RANDOM NUMBERS) 
1620-07.0.021 RANDOM NUMBER SUBROUTINE FOR IBM 1620 FORTRAN W/FORMAT 
1620-07.0.024 FOURIER CURVE FITTING - 1 - PASS 
1620-07.0.026 ERROR FUNCTION - 1620 FORTRAN SUBROUTINE 
1620-0 7.0.0 27 POLYNOMIAL CURVE FITTING AND EVALUATION 
1620-07.0.031 FOURIER CURVE FITTING - 2 PASS 
1620-07.0.0 39 BIVARIATE CURVE FIT 

1620-0 7.0.040 POLYNOMIAL ROOTFINDER BY BARSTOW'S METHOD 

1620-07.0.057 RANDOM NUMBER SUBROUTINE FOR FORTRAN II - D UNDER MONITOR I 
1620-07.0.058 CONIC EQUATIONS PROGRAM 
1620-07.0.059 RANDOM NUMBER SUBROUTINE FOR FORTRAN 2 
1620-07.0.074 X Y PLOT PROGRAM 
1620-07.0.076 FORTRAN II - D SUBROUTINE FOR MATRIX INVERSION AND/OR 

RELATED OPERATIONS 
1620-08.1.005 GENERAL RAY TRACE PROGRAM 

16 20-09.0.001 GRAPH 2 - A PRINTER PLOTTING SUBROUTINE ALGORITHM 
16 20-0 9.2.010 CURVE BRIDGE PROGRAM 
1 6 20-0 9.2.016 DTM DESIGN SYSTEM 20K 
1620-09.2.019 DTM DESIGN SYSTEM 40K 

1620-09.2.0 20 COMPUTER SOLUTIONS FOR SLOPE STABILITY ANALYSIS/PAPER TAPE 
16 20-0 9.2.0 22 COLUMN ANALYSIS UNDER AXIAL LOAD AND TWO WAY BENDING 
1620-09.2.026 DTM LOCATION SYSTEM 
1620-09.2.0 29 WATER HAMMER 
1620-09.2.0 34 SUBDIVISION PROGRAM 

1620-09.2.0 36 DEAD LOW BEAM DEFLECTIONS PRECISION 
1620-09.2.039 PIPE FRICTION HEAD LOSS CALCULATIONS IN WATER SUPPLY 

ENGINEERING USING THE DARCY METHOD 
1620-09.2.0 50 PRESTRESSED GIRDER ANALYSIS AND DESIGN PROGRAM FOR THE IBM 

1620 DATA PROCESSING SYSTEM 
16 20-09.2.0 51 TWIN BOX CULVERT DESIGN 

1620-09.2.053 CONTINUOUS BEAM SERIES - PROGRAM I THRU IX AND XCIX /CARD/ 
1620-09.2.054 SUBDIVISION CUT AND FILL 
1620-09.2.055 DESIGN EARTHWORK VOLUMES 

1620-0 9.2.0 56 DETERMINATE AND INDETERMINATE PIN JOINTED TRUSS ANALYSIS 
1620-09.2.0.79 WELDED STEEL COMPOSITE BEAM DESIGN 

1620-09.2.082 SYNCHRONIZING TRAFFIC SIGNALS FOR xMAXIMAL BANDWIDTH 
1620-09.2.083 THE SELECTION OF A CYCLE LENGTH FOR FIXED TIME TRAFFIC 

SIGNALS 
1620-09.2.084 GENERALIZED STACK - VIBRATION CALCULATIONS BASED ON RAYLEIGH 

- RITZ FORMULAE 
1620-09.3.008 MULTICOMPONENT DISTILLATION TOWER DESIGN CALCULATIONS BY 

SHORT CUT METHODS 
1620-09.3.012 THIELE - GEDDES METHOD FOR MULTICOMPONENT DISTILLATION 
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PROGRAM NO. PROGRAM TITLE 



1620-09.3.017 CALIBRATION AND SIZING OF ORIFICE FLOWMETERS 

1620-09.4.064 LOCUL - A ROOT LOCUS ALGORITHM 

1620-09.4.065 BODE - A FREQUENCY RESPONSE ALGORITHM 

1620-09.4.066 ANALOG 

1620-09.5.004 H-104, TWO DIMENSIONAL, TRANSIENT OR STEADY HEAT CONDUCTION 

1620-09.5.005 FAMILY OF COMPUTER PROGRAMS FOR DISK CAM COMPUTATIONS 

1620-09.5.006 NATURAL FREQUENCIES AND RELATIVE DEFLECTIONS AND FORCES OF 

VIBRATING BEAM 

1620-09.5.014 KINEMATIC ANALYSIS METHOD 

1620-09.6.00 3 RATE OF FLOW CALCULATIONS FOR PETROLEUM LIQUIDS AND GASES IN 

REFINERY OPERATIONS 

1620-09.7.001 DISTRIBUTION OF WATER FLOW A PIPE NETWORK 

1620-09.7.00 8 WATER FLOW IN A PIPE NETWORK BY HARDY CROSS SOLUTION /CARD/ 

1620-09.7.014 STRESS/CARD/ 

1620-10.1.002 LINEAR PROGRAMMING CODE FOR THE IBM 1620 WITH CARD INPUT AND 

OUTPUT 

1620-10.1.005 TRANSPORTATION PROGRAM FOR THE IBM 1620 

1620-10.1.007 LINEAR PROGRAMMING I 

1620-10.1.008 LINEAR PROGRAMMING 

1620-10.1.011 ECONOMIC ORDER QUANTITIES FOR LINEAR DEMAND FUNCTIONS 

1620-10.1.013 LINEAR PROGRAMMING MANAGEMENT DECISION EXERCISE 

1620-10.3.003 LESS (LEAST-COST ESTIMATING AND SCHEDULING) SCHEDULING 

FORTRAN 

16 20-10.3.010 ECONOMIC ANALYSIS OF PLANS - OUTPUT 1 AND OUTPUT 2 

1620-10.3.011 MISS LESS MANAGEMENT INFORMATION SCHEDULING 

1620-10.3.019 PECOS - PROTECT EVALUATION AND COST OPTIMIZATION SYSTEM 

1620-10.3.023 HEXUP 

1620-10.3.025 TWO DIMENSIONAL TRIM PROBLEM 

1620-10.3.026 DYNAMIC 

1620-10.3.027 LINEAR DECISION RULE FOR PRODUCTION AND EMPLOYMENT SCHEDULING 

16 20-10.3.028 CRITICAL PATH AND MAN 

1620-10.3.029 CRITICAL PATH AND MAN SCHEDULING (60K VERSION) 

1620-10.3.031 PERT-LESS 

1620-10.3.035 PORTFOLIO SELECTIONS - DIAGONAL MODEL/40K/ /CARD/ 

1620-10.3.036 KWIC - KEYWORD IN CONTEXT INDEXING INFORMATION RETRIEVAL 

1620-10.3.040 WEEK - WEEKLY SCHEDULE USING MASTER SCHEDULE 

1620-10.3.052 ANALYSIS OF FACTORS AFFECTING OPTIMUM PLANT SIZE 

16 20-11.0.005 BLACKJACK GAME 

1620-11.0.017 RANDOM WALK DEMONSTRATION 

1620-11.0.019 HIM AND HER 

16 20-11.0.0 21 QUEENS GAME (MODIFIED) 

16 20-11.0.022 PERPETUAL CALENDAR 

1620-11.0.023 CARD SYSTEM DEMONSTRATION 

1620-11.0.024 ACCOUNTING DEMONSTRATION PROGRAM - ADP 

1620-11.0.025 GAME OF DICE 

1620-11.0.028 INFORMATION RETRIEVAL SYSTEM DEMONSTRATION 

1620-11.0.033 MUSICAL OUTPUT PROGRAM 

1620-11.0.034 MUSICAL ASSEMBLY PROGRAM 

1620.11.0.039 MUSIC INTERPRETER 

1620-11.0.040 DEMONSTRATION PROGRAM TO PRINT OUT PRIME NUMBERS 

1620-11.0.052 MONABUS - A BUSINESS SIMULATION EXERCISE 

1620-11.0.055 NOPE/NIM ONE FILE EDUCATOR 

1620-13.0.011 SCRAMBLE - COMPUTER PREPARATION OF MULTIPLE FORMS OF AN 

EXAMINATION 

16 20-13.0.012 EXAMINATION ASSEMBLY PROGRAM 

1620-13.0.013 FORTRAN TEACH 

16 20-13.0.019 PACTOLUS - A DIGITAL ANALOG SIMULATOR PROGRAM 

1620-13.0.026 A COMPUTER PROGRAM TO POWER-MATCH TEAMS IN A DEBATE 

TOURNAMENT 

1620-13.0.028 UNIVERSITY OF MISSISSIPPI TEST SCORING PROGRAM - UMTS 

1620-13.0.031 UNIVERSITY OF MISSISSIPPI TEST SCORING PROGRAM 

1620-13.0.036 CAST - COMPUTER ASSISTED TEST SCORING 
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ABERRATIONS 

TITLE 
ABERRATIONS. (GENERAL RAT TRACE AND THIRD* 
ABS, DEF, PLOT, WRIT. (RELOCATABLE 

(ABSOLUTE ASSEBBLY SYSTEB 7094 FAP* 

•ABSORPTION CORRECTION IN CRISTA! STRUCTURE* 
ABSORPTION CORRECTION IN CRYSTAL STRUCTURE* 
ABSORPTION CORRECTION IN CRYSTAL STRUCTURE* 
ABSTRACT. (ZIP - KEYWORD IN CONTEXT ANALYSIS* 
ACCOUNTING CASE. (WISAI PROCESSOR FOR 

♦ACCOUNTING DEMONSTRATION PROGRAB - ADP. 
ACTUAL 21-HOUR LOAD CYCLE. (TRANSFORMER* 
AD-APT NUBERICAL CONTROL PROCESSOR. 
ADDITIONS AND DISK UTILITY PACKAGE. (DISK* 

(ADIABATIC FLABE TEMPERATURE, HO DISSOCIATION. 
ADJUSIBENT OF AERIAL TRIANGULATION STRIP* 
ADJOSTBENT OF PRECISE SURVEY OBSERVATIONS. 
ADJUSIBENT PROGRAB. (SEASONAL 

ADJUSIBENT. (SEASONAL 

ADBITTANCE PAEANETERS. (SCATTEBING-NATRIX* 
ADP. (ACCOUNTING DEBONSTRATION PROGRAB - 

(AERIAL TRIANGULATION STRIP FORBATION - 6431. 
AERIAL TRIANGULATION STRIP 6432 ♦ 6433. 
AFIT FORTRAN FOR BONITOR I SYSTEB. (GOTAFIT* 

(AFIT IBPROVED FORTRAN. 

#AFIT LOAD AND GO SYBBOLIC PROGRABBING SISTEB. 

(AFIT SYBBOLIC PROGRABBING SISTEB. 

(AFIT SYBBOLIC PROGRABBING SYSTEB, BODIFIED* 
ALGEBRA. (BAGIC II - BATRIX 

(ALGEBRAIC SOLUTION FO GENERAL RIAL QUARTIC* 

(ALGOL. 
ALGORITBB. (LOCUL - A ROOT LOCUS 

ALGORITHfl. (BODE - A FREQUENCY RESPONSE 
ALIGNNENT AND OFFSETS (HALO) . (HORIZONTAL 
ALIGNBENT AND STAKEOUT. (VERTICAL 

ALIGNBENT DATA FROB COORDINATES (TAPE). 
ALLIED DATA. (CALCULATION OF CENTER OF* 

(ALPHABETIC INDEXER AND LISTER FOR* 

(ALPHABETIC PLOTTING PROGRAB FOR THE. OUTPUT* 
ALPHAHEEIC FORBAT PLOT RELOCATABLE* 
ALPHANDHERIC SEARCH AND INFORBATION* 
ALTERNATE SUBROUTINE. (EDQ THIRD 

AHORTIZATION PROGRAB. (HORTGAGE 

ABPLIFIERS TRANSFER FUNCTIONS. (CALCULATION* 
ANALOG SIBULATION PROGRAB. (JANET - DIGITAL 
ANALOG SIBULATION PROGRAB. (JANET-II - 

(ANALOG. 
ANALYSIS-PRINCIPAL COBPONENTS I AND II. 
ANALYSIS/PARIOW. (BIOASSAI 

ANALYZER. (SPS OBJECT DECK 

ANCHOE PIPE STR1SS ANALYSIS. (BULTI 

(ANL BNEBCNICS DUNP. 
ANNOTATION SUBPEOGRAH. (CHAR 

ANOV. (COHPLETELY GENERALIZED 

(ANSIR - ALFHANUHERIC SEARCH AND INFORBATION* 
ANTENNA ARRAY. (ELECTRICAL FIELD INTENSITY* 
ANTOINE EQUATION . (LEAST SQUARES FIT OF* 
APERATURE AND SPOT DIAGRAB PROGRAMS. 

(APPROXIBATE EECTANGULA5 GABE SOLUTION. 
APPROXIMATION PROGRAB. (RATIONAL 

APPROXIBATION TO TBE ERROR FUNCTION* 

(ARCSINE SUBROUTINE (RELOCATABLE) . 

(ARCTANGENT SUBROUTINE. 
ARGUBENTS. (FORTRAN WITH FORBAT GABHA* 
ARITHBETIC BORE PROGRABBING. (LESS 

ARITHBETIC SUBROUTINES. (DOUBLE PRECISION* 
ARRAY. (ELECTRICAL FIELD INTENSITY* 
ASSEBBLER BY RICE UNIVERSITY. (1620 SPS 
ASSEBBLER. (N.C.E. HIGH SPEED SPS 

ASSEBBLY PROGRAB. (BUSICAL 

ASSEBBLY PROGRAB. (EXABINATION 

ASSEBELY SYSTEB 7094 FAP+ 
ASSIGNBENT TECBNIQUE PROGRAB. (CRITICAL PATH* 

(ASSIST. 
ASSISTED TEST SCORING. (CAST - COMPUTER 
ASSOCIATION. (INDEX CF ORDER OF 

ASSUBPTIONS OF HOHOGENEITI OF VARIANCE,* 

(ASTH-TO-TBP AND TBP-TO-ASTB DISTILLATION* 
ASYBBETRIC BAIRICES. (CORRELATION PROGRAB* 
ASIBBETRIC HATRICES. (BISSING DATA* 
ATOBIC DISTANCE CALCULATION IN X-RAY* 
ATOBIC SCATTERING FACTOR TABLES. 

(AUTO CORRELATION-POWER SPECTRUB. 

(AUTO FLOAT FORTRAN PROCESSING SYSTEM. 
AUTO MINIMIZATION OF ERROR. (BADAB - BATRIX* 

(AUTOCORRELATION-SPECIAL ANALYSIS. 
AUTOMATA. (BINIBIZATION AND STATE* 

(AUTOBATIC DATA CORRECTION SYSTEB - WESTERN* 
AUTOBATIC FLOATING POINT. (FORTRAN II FOR 

(AUTOSPOT II POST-PROCESSOR FOR CINTIBATIC* 
AOTOSPOT III NUBERICAL CONTROL PROCESSOR. 

(AUTOSPOT POST - PROCESSOR FOR BILBAUKEE -♦ 

(ADTOSEOT PROGRAB. 
AXES FACTOR ANALYSIS USING HOTELLINGS* 
AXIS. (SX-1.01 - TRAVERSE 

AZEOTROPE DATA. (CALCULATION OF VAN LAAR* 

(BACKWATER CURVE PROGRAB. 
BALANCE. (TURBINE CYCLE HEAT 

BALANCED LATTICE - USU 52. (ANALYSIS OF* 
BALANCED LATTICE DESIGN. (ANALYSIS OF* 
BALANCING. (PRODUCTION LINE 

BAR GRAPH GENERATOR PROGRAB. (CRITICAL* 

(BARTLETTS TEST FOR HOMOGENEITY OF VARIANCE. 

(EASEEALL GABE PROGRAB. 
BASEBALL SIBULATION AND DEMONSTRATOR. #EBC 

(BATCH PROCESSING STEPWISE BULTIPIE LINEAR* 

#EBC EASEBALL SIBULATION AND DEMONSTRATOR. 
BEAB ANALYSIS AND STEEL BEAB DESIGN. 

(BEAM CABBER CALCULATIONS. 
BEAB DEFLECTIONS. (DEAD LOW 

BEAB DESIGN. (WELDED STEEL COBPOSITE 

BEAB DESIGN. (CONTINUOUS BEAB ANALYSIS AND* 



KJJC (KEIWO RD-IN-CONTEXT) INDEX 
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1620-EO- 

1620-07. 

1620-02. 

1620-08. 

1620-08. 

1620-08. 

1620-10. 

1620-02. 

1620-11 

1620-09 

1620-CN 

1620-01 

1620-09 

1620-09 

1620-09 

1620-10 

1620-06 

1620-09 

1620-11 

1620-09 

1620-09. 

1620-01. 

1620-01. 

1620-01. 

1620-01. 

1620-01. 

1620-05. 

1620-07. 

1620-02. 

1620-09 

1620-09. 

1620-09 

1620-09 

1620-09 

1620-09 

1620-10. 

1620-08 

1620-13 

1620-01. 

1620-02 

1620-11 

1620-09 

1620-02. 

1620-02 

1620-09. 

1620-06. 

1620-06 

1620-01 

1620-09. 

1620-01. 

1620-13 

1620-06. 

1620-01. 

1620-09. 

1620-09. 

1620- EO 

1620-07. 

1620-07 

1620-07. 

1620-07. 

1620-07. 

1620-07 

1620-01. 

1620-07. 

1620-09 

1620-01 

1620-01 

1620-11. 

1620-13 

1620-02 

1620-10. 

1620-01. 

1620-13. 

1620-06. 

1620-06. 

1620-09. 

1620-06. 

1620-06. 

1620-08 

1620-08 

1620-06. 

1620-01 

1620- ! 05. 

1620-06 

1620-13. 

1620-01. 

1620-FO 

1620-10. 

1620-CN- 

1620-10 

1620-CN 

1620-06 

1620-09. 

1620-09. 

1620-09. 

1620-09. 

1620-06. 

1620-06. 

1620-Lfl- 

1620-10. 

1620-06. 

1620-11. 

1620-11. 

1620-06. 

1620-11 

1620-09. 

1620-09. 

1620-09. 

1620-09. 

1620-09. 



NO. 

01X 

0.053 

0.030 

4.014 

4.016 

4.017 

3.032 

0.058 

0.024 

4.032 

06 X 
6.134 
3.011 
2.049 
2.046 
3.024 
0.054 
4.063 
0.024 
2.048 
2.049 
2.015 
1.010 
1.032 
1.023 
1.027 
0.031 
0.049 
0.044 
4.064 
4.065 
2.038 
2.081 
2.027 
5.013 
3.038 
4.007 
0.010 
6.064 
0.049 
0.018 
4.057 
0.053 
0.054 
4.066 
0.169 
0.131 
6.060 
4.030 
6.022 
0.014 

.090 
6.064 
4.061 
3.016 
03 X 
0.046 
0.079 
0.077 
0.051 
0.006 
0.048 
1.001 
0.010 
4.061 
1.028 
1.029 
0.034 
0.012 
0.030 
3.030 
4.025 
0.036 
0.098 
0.152 
3.006 
0.114 
0.121 
4.008 
4.003 
0.147 
6.076 
0.015 
0.166 
0.035 
6.117 

9 
4.010 

07 X 
3.015 
05X 
0.091 
2.060 
3.015 
2.028 
5.009 
0.105 
0.062 
018 
3.020 
0.210 
0.037 
0.032 
0.251 
0.032 
2.017 
2.024 
2.036 
2.079 
2.017 



PAGE 

003 

079 

032 

085 

085 

085 

114 

036 

120 

102 

001 

026 

097 

092 

091 

114 

048 

106 

120 

092 

092 

016 

013 

015 

013 

014 

42 

078 

033 

106 

106 

090 

096 

088 

109 

115 

084 

126 

020 

034 

119 

105 

035 

035 

107 

062 

057 

020 

101 

019 

127 

051 

020 

106 

098 

004 

078 

082 

081 

078 

074 

078 

013 

075 

106 

014 

014 

121 

127 

032 

114 

018 

130 

053 

060 

097 

055 

056 



059 
021 
040 
062 
129 
024 
005 
118 



094 
098 
088 
108 
054 
049 
006 
113 
066 
122 
121 
074 
121 
087 



TITLE 
BEAB LIVE LOAD DEFLECTIONS. (CONTINUOUS 
BEAB BETHOD. (DEFLECTIONS IN HINGED SPANS BY* 
BEAB OR EQUI-INCLINATION SETTING. (INTENSITY* 
BEAB SERIES - EROGRABS I AND II. (COBPOSITE 
BEAB SERIES -PROGRAMS I THRU IX AND XCIX. 
BEAB. (NATURAL FREQUENCIES AND RELATIVE* 
BEARING. (RANGE AND 

BENDING. (RECTANGULAR REINFORCED CONCRETE* 
BENEATH CLASS HAXIBA. (FREQUENCIES SHOWN 

(BESSEL FUNCTION SUBROUTINES FOR FORTRAN WITH 
BESSEL FUNCTIONS OF INTEGRAL ORDER. 

(BG-UTO FORTRAN. 
BI-AXIAL BENDING. (RECTANGULAR REINFORCED* 

(BINARIATE LINEAR CORRELATION. 



BINARY SIHULATOR. 
(BINOBIAL COEFFICIENTS. 
BINOMIAL DISTRIBUTION. 



(CARLETON 



(ESTIBATION OF* 



BINOMIAL DISTRIBUTION. (POWER CURVES FOR THE* 



(FITTING POISSON 
(FITTING NEGATIVE 



BINOBIAL DISTRIBUTIONS 
BINOBIAL DISTRIBUTIONS 
BINOMIAL POISSON NORMAL STUDENT T/CHI-SQUARE* 
(BIOASSAY ANALYSIS/PARLOW. 
(BLACKJACK GABE. 
BLOCK DESIGN - SIBPLE OR BULTIPLE USU 10. 
BLOCK DESIGN-DSU 63. MULTIVARIATE ANALYSIS* 
BLOCK DESIGN, INDIVIDUAL AND COBB. STATION* 
BLOCK DESIGN, NO SDB-SABPLES. (ANALYSIS OF* 
BLOCK DIAGRAB. (PLOT A 

BLOCK LETTERING ON IBB CARDS. (CARD PUNCH* 
BLOCKS USU 12. (ANALYSIS OF VARIANCE -+ 
BLOND TAPE-TURN LATHE WITH HARK CENTURY* 
(BODE - A FREQUENCY RESPONSE ALGORITHH. 
(BOILERBAKER DAIRY BANAGEBENT GABE. 
(BOILERBAKER FARB SUPPLY BUSINESS BANAGEBENT* 
(BOILERBAKER SUFERBARKET BANAGEBENT GABE. 
(BOOLEAN FUNCTION TBANSFORNATION. 
(BOSTON COLLEGE DECISION-BAKING EXERCISE. 
BOX CULVERT DESIGN. (TWIN 

BRANCH AND TRANSHIT - (TLDNBT) . (TABLE* 
(BREAKDOWN AND TALLY PROGRAB (TALLY). 
BRIDGE ELEVATIONS. (SKEWED 

BRIDGE PROGRAB. (CURVE 

BUCKLING ANALYSIS OF OUTSTANDING COBPRESSION* 
BUILDING IN BUITIPLE REGRESSION USU 15, 16. 
BUILDINGS. (COOLING-LOAD DETEBBINATION FOR 
BUILDINGS. (HEATING-LOAD DETERBINATION FOR 
BURGMASTER DRILL PRESS WITH HUGES NC-211+ 
BUSINESS BANAGEBENT GABE. (BOILERBAKER FARB* 
BUSINESS SIBULATION EXERCISE/CARD/. (BONABOS* 
CABLE RATINGS. (NORBAL AND EMERGENCY 

CAL-COBP PLOTTER. (FORTRAN FORBAT SUBROUTINE* 
CAL-COBP PLOTTER. (FORTRAN II SUBROUTINE FOR* 
(CAL-COBP 565 PLOTTER SUBROUTINE PEN FOR* 
CALCULATION AND APPLICATION. (NETWORK* 
CALCULATION IN X-RAY CRYSTALLOGRAPHY. 
CALCULATION IN X-RAY CRYSTALLOGRAPHY. (INTER* 
CALCULATION IN 2 PASSES. (RADIAL THREE PHASE* 
(CALCULATION OF CENTER OF GRAVITY, POLAR* 
(CALCULATION OF CLEBSCH-GORDAN COEFFICIENTS. 
(CALCULATION OF EIGENVALUES AND EIGENVECTORS* 
(CALCULATION OF HINERAL UNIT CELL CONTENTS. 
(CALCULATION OF MULTIPLE CORRELATION* 
(CALCULATION OF POLES AND ZEROS OF ABPLIFIERS 
(CALCULATION OF ROOTS (REAL AND COBPLEX) OF A 
(CALCULATION OF ROOTS (REAL AND COMPLEX) OF* 
(CALCULATION OF THE CHARACTERISTIC POLYNOHIAL 
(CALCULATION OF THE REAI ROOTS OF A REAL* 
(CALCULATION OF THE REAL ROOTS OF A REAL* 
(CALCULATION OF THE REAL ROOTS OF A SISTEB OF 
(CALCULATION OF VAN LAAR CONSTANTS AND VAPOR* 
CALCULATION. (ELECTRIC SHORT CIRCUIT CURRENT 
CALCULATIONS BASED ON RAYLEIGH-RITZ* 
CALCULATIONS FOR RADIAL DISTRIBUTION LINES. 
CALCULATIONS IN WATER SUPPLY ENGINEERING* 
CALCULATIONS OF THE DEFINITE INTEGRAL OF A* 



CALCULATIONS. 

CALCULATIONS. 

CALCULATIONS. 

CALCULATIONS. 

CALCULATOR. 

CALENDAR - 1585 to 2599 A.D.. 

CALENDAR. 

CALENDAR. 

CALENDAR. 



(BEAB CABBER 
(SHORT CIRCUIT 
(GENERALIZED SAG AND TENSION 
(RADIAL THREE PHASE LINE DROP 
(EXPENSIVE DESK 
(GREGORIAN 
(PERPETUAL 
(UNIVERSAL 
(DATE INTERPRETER AND PERPETUAL 
CALL SUBROUTINES FOR PLOTTING. (FORTRAN 
CAB COHPUTATIOBS. (FABILY OF COBPUTER* 
CABBER CALCULATIONS. (BEAB 

CANONICAL CORRELATION COEFFICIENT AND* 
CANONICAL CORRELATION PROGRAM. (ONE PASS 
(CANONICAL CORRELATION. 
(CAPITAL INVESTMENT. 
(CAPITAL INVESTMENTS. 
(CAREFREE PROGRAB DUBPER. 
(CARLETON BINARY SIBULATOR. 
(CARLETON COLLEGE COBPILER. 
(CARLETON SPS. 
CAROLINA COLLEGE. (AUTOBATIC DATA CORRECTION* 
CASE. (WISAL PROCESSOR FOR COBPUTER 
(CAST - COBPUTER ASSISTED TEST SCORING. 
CATALOG FOR DIGITAL COBPUTERS - PROCOB. 
CATEGORIAL SYLLOGISB. (A DEBONSTRATION* 
(CAUER EXPANSIONS OF PASSIVE ONE-PORT* 
CELL CONTENTS. (CALCULATION OF BINERAL UNIT 
CELL FREQUENCY. (1 TO 4 WAY ANALYSIS OF* 
CELL SIZE-NON-SORT-ANOV. (TEN MCDEL-EQUAL 
CELL. (NONPARAMETRIC TWO-WAY ANALYSIS OF* 
CENTER OF GRAVITY, POLAR BOBENTS OF INERTIA* 
CENTIGRADE RISE TRANSFORBERS BASED ON LOSS* 
CENTROID BETHOD. (FACTOR ANALYSIS - 

CENTROID BETHOD.. (FACTOR ANALYSIS BY THE 



PROGRAM 

1620-09. 

1620-09. 

1620-08. 

1620-09. 

1620-09. 

1620-09. 

1620-07. 

1620-09. 

1620-06. 

1620-07. 

1620-03. 

1620-02. 

1620-09. 

1620-06. 

1620-02. 

1620-07. 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-11. 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-01. 

1620-11. 

1620-06. 

1620-10 

1620-09 

1620-11 

1620-11 

1620-11 

1620-05. 

1620-10 

1620-09 

1620-01 

1620-06 

1620-09 

1620-09 

1620-09 

162 0-06 

1620-09 

1620-09. 

1620-10 

1620-11 

1620-11 

1620-09 

1620-01 

1620-01 

1620-13 

1620-09. 

1620-08 

1620-08 

1620-09. 

1620-09. 

1620-06 

1620-05. 

1620-08 

1620-06 

1620-09 

1620-07. 

1620-07. 

1620-07. 

1620-07 

1620-07. 

1620-07. 

1620-09. 

1620-09 

1620-09 

1620-09 

1620-09. 

1620-07. 

1620-09 

1620-09 

1620-09 

1620-09 

1620-11 

1620-11 

1620-11 

1620-11 

1620-11 

1620-01 

1620-09. 

1620-09 

1620-06 

1620-06 

1620-06 

1620-CS-: 

1620-10. 

1620-01. 

1620-02. 

1620-02. 

1620-02 

1620-01. 

1620-02. 

1620-13. 

1620-10 

1620-13 

1620-09. 

1620 

1620-06. 

1620-06. 

1620-06. 

1620-09. 

1620-09. 

1620-06. 

1620-06. 



CENTROID 
NO. PAGE 

2.067 094 
2.063 094 
4.002 083 
2.057 093 
2.053 093 

5.006 107 
0.067 080 
2.037 090 
0.227 070 
0.037 077 
0.005 038 
0.036 033 
2.037 090 
0.188 065 
0.035 032 
0.060 079 
0.117 055 
0.116 055 
0.245 073 
0.248 073 
0.128 056 
0.131 057 
0.005 118 
0.107 054 
0.139 058 
0.123 056 
0.070 050 
6.131 025 
0.041 122 
0.087 051 
4.013 118 
4.065 106 
0.048 124 
0.049 124 
0.047 124 
0.025 041 
2.005 111 
2.051 092 
6.153 029 
0.231 070 

2.009 086 

2.010 086 

2.030 089 
0.084 051 

7.012 109 

5.011 108 
4.011 118 
0.049 124 
0.052 125 

4.031 101 

6.068 021 
6.065 020 
0.005 126 
4.029 101 
4.004 084 

008 084 
4.020 100 

5.013 109 
0.155 060 
0.016 041 

3.004 083 
0.193 065 
4.057 105 

. 032 076 

.E29 076 

.042 077 

0.017 075 

033 076 

0.841 077 

3.015 098 

4.045 103 

2.084 097 

4.056 105 

2.039 090 

.043 077 

2.024 088 

4.007 099 

2.069 095 
4.018 100 
0.043 123 
0.044 123 
0.022 120 
0.026 120 
0.045 123 
6.123 025 

5.005 107 
2.024 088 
0.178 063 
0.214 067 
0.137 058 
01X 002 
3.037 115 
6.142 027 
0.035 032 
0.038 033 
0.039 033 
6.117 024 
0.058 036 
0.036 130 
3.049 117 
0.008 126 
4.026 100 
3.004 083 
0.202 065 
0.213 067 
0.218 068 
5.013 109 
4.060 105 
0.103 053 
0.053 048 



XV 



CENTOBY 

TITLE 
CENTURY NUMERICAL CONTOURING BITH "E"* 
CHAIB PROCESS. MARKOV 

#CBAB ANNOTATION SUBPROGRAM. 

CHARACTERISTIC POLYNOMIAL OF A SEAL SQOARE+ 
♦CHEBYCHEV ECONOMIZATION CE POLYNOMIALS. 
CHECK AMD INCREASE LIBEABITY IB DATA. 
CHECK PROGBAN. ♦CONTINUOUS FOBEST INVENTORY* 
CHECKEB. ♦FORTRAN FOBBAT 

CHEMICAL BEACTIOHS. ♦COMPOTATION OF* 
*CHI SgOABE. 

CHI SQOARE, WHEN EXPECTATIONS ABE SHALL. 
♦CHI-SQUARE »2. 
CHI-SQUAEE: ANALYSIS, COUNT TABLE OR RAB+ 
CHI-SQOARE ABALYSIS, COOBT TABLE OR RAH* 
CHOICE ITEM ANALYSIS PBOGBAH. #FIVE 

CHOICE SPLIT-BALF BELIABILITY EROGRAB BITH* 
CBOBDS. #TBE BOCKLING ABALYSIS OF* 
CIBTIBATIC TOBEET DBILL BITB STEPPIBG SWITCH* 
CIRCDIT ABALYSIS BY BATRIC BETBOD. tSBOBT 
CIRCUIT ABALYSIS OF BADIAL SYSTEHS. ♦SHORT 
CIRCUIT ABALYSIS PROGRAfl. «ELECTROBIC 

CIRCDIT ABALYSIS. ♦SHOE! 

CIBCOIT CALCULATIONS. tSBORT 

CIRCUIT COBREBT CALCULATION. #EIECTBIC SBOBT 
CIBCOIT STUDY PBOGBAH. #THBEE PBASE SHOBT 
CIRCUITS. ♦SOLUTIONS FOR DETERMINATION OF* 
#CIVIL BNGIBEERIBG COORDINATE GECHETBY COGO 1 
♦CIVIL EBGISEEBIBG COORDIBATE GEOHETBY I -+ 
CLASS MAXIMA. »FBEQUEBCIES SHOWN BEHEATB 
CLEANER. #DISK 

♦CLEAR ABD LOAD 20K. 

CLBBSCB-GORDAB COEFFICIEBTS. ♦CALCULATION OF 
tCOAL PILE VOLUHE. 
CODE FOR THE IBH 1620. ♦ WHY At 
COEFFICIEBT ABD REGBESSIOB HEIGHTS. 
COEEFICIEBT HATRIX WITH BISSIBG DATA POINTS. 
COEFFICIEBT HATBIX. #SIHPLE COBBELATIOH 
COEFFICIENT PROGRAH. «CORRELATIOB 

COEFFICIENT. #LINEAR CORBELATIOB 

COEFFICIENT. ♦CALCULATION OF MULTIPLE* ' 
COEFFICIENT. ^KENDALL'S TAO AND SPEARBAN'S* 
COEFFICIEBTS PROGRAH; B. PLOT-BACK PROGRAH. 
COEFFICIENTS. ♦BINOMIAL 

COEFFICIEBTS. tCORRELATIOB 

COEFFICIENTS. #OETHOGOBA1 POLYBOHIAL 

COEFFICIENTS. ((CALCULATION OF CIEBSCB-GORDAB 
COFIT PROGRAH ADAPTED TO THE IBH 1620. 
COGO I. ♦SPIBAL PLOG DECK TC 

♦ COGO PLOT CC ADDITIOBAL COGO SOBROUTISES. 
COGO 1 - CARD. ♦CIVIL ENGINEERING COOEDIBATE* 
COLLECTIOB. MULTIVARIATE DATA 

COLLEGE COMPILER. tCAELETON 

COLLEGE DECISION-HAKING EXERCISE. #BOSTON 
COLLEGE. #AUTOBATIC DATA CORRECTIOB SYSTEH -+ 
COLUHB ANALYSIS - BI-AXIAL BEBDIBG. 
COLUHB PUBCB COOBT. ♦ CABD 

COLUMN. #FEEQUENCY DISTRIBUTION GENERATOR* 
COLOHN. #FBEQOEBCY DISTRIBOTIOB FBOGEAM -+ 
COLUMN. ♦FREQOENCY DISTRIBUTIONS - SINGLE* 
COLOBNS. MEAN, STANDARD DEVIATION, AND* 
COHB. STATION SDHHARIES. ♦ANALYSIS OF* 
♦COMBINATIONAL SHITCBING FUNCTIOB SUBROUTINE* 
COMBINATIONS OF THO SETS OF VARIABLES. 
COHPARE SOBBOUTINE FOB SPS. ((FLOATING 

COHPABISOBS. tBEST K OF 2K-1 

COMPARISONS. ♦ A PROGRAM FOR PAIB 

COHPILEB AND SUBROUTIBES. #FOBTBAB 90 

COHPILER SUBBOOTINE. ♦FORMAT STATEMENT 

COHPILEB. tNELIAC 

COHPILEB. #CABLETON COLLEGE 

♦COHPLEX FORTRAN FOB THE 1620. 
COHPIEX LOAD CYCLES. ((TRANSFORMER SATING FOR* 
COHPIEX HATRIX. #PROGRAH TO CONVERT A 

COHPLEX BOMBERS. ♦INTERPRETIVE SYSTEH FOR* 
COHPLEX ROCTS OF POLYBOHIAL. #REAL AND 

COMPLEX VALUES. ♦SIHULTANEOOS EQ0ATION+ 
COMPONENTS I AND II. ♦FACTOR* 

COMPOSITE BEAH DESIGN. ((WELDED STEEL 

♦COMPOSITE EEAM SERIES - PROGRAMS I ABD II. 
COMPOSITION ABD DECOMPOSITION. ((VECTOR 
COMPOSITION AND TEMPERATURE OF CHEMICAL* 
COMPRESSION CBORDS. (1TBE BUCKLING ABALYSIS* 
♦COHPRESSION SPRING DESIGN, DYNAHIC LOAD. 
COHPBESSOR ABD HOLTI-PROGRAMHER. ((FORTRAN 
COHPRESSOR PROGBAM. ♦GENERAL 

COMPRESSOR. *PDQ FORTRAN 

COMPRESSOR. ((MULTIPURPOSE SPS CARD OOTPOT 
COMPUTATION FOE RIVERS AND STREAHS. 
♦COMPUTATION OF BESSEL FUNCTIONS OF IBTEGBAL* 
♦COMPOTATIOB OF EQUILIBRIUM COMPOSITION AND* 
♦COMPUTATION OF ROOT LCC I. 

♦COMPUTATION OF THE CANONICAL CORRELATION* 
♦COHPUTATION OF THE CUMULATIVE BINOMIAL* 
COMPUTATION. #GEOMETBIC 

COMPUTATION. ♦GEOMETRIC 

COMPUTATION. ♦GECHETEIC 

COMPUTATION. ♦INVERSE GEODETIC POSITION 
COMPUTATIONS PROGRAH. ABATER WAY 

COMPOTATICNS PROGBAH. ♦RADIAL ENERGY* 
COMPUTATIONS. ♦FAMILY OF COMPUTER PROGRAMS* 
COMPUTED FROH SHCBT-CIRCUIT ADHITTANCE+ 
COHPOTERS - PROCOH. ♦PROGRAM CATALOG FOR* 
♦COMPUTEST. 
CONCEPTS FOR THE BURGMASTER DRIII PRESS BITH* 
CONCORDANCES, GLOSSARIES, AND DICTIONARIES. 
CONCRETE COLOHB ANALYSIS - BI-AXIAL BENDING. 
CONDUCTION. ♦B-104, TBO-DIHENSIONAI,* 
CONDUCTOR SIZE (SPECIFIC CASE NEB ENGLAND* 
♦CONIC EQUATIONS PROGBAH. 
CONJUGATE BEAH HETHOD. ♦DEFLECTIONS IN* 



KBIC (KEIBOBD-IH-C 

PROGRAM NO. PAGE 

1620-10. 1(. 013 11S 

1620-05.0.038 042 

1620-13.0.011 127 

1620-07. 0.042 077 

1620-07.0.047 078 

1620-06.0.250 074 

1620-06.0.043 047 

1620-01.1.017 013 

1620-09.3.018 098 

1620-06.0.099 053 

1620-06.0.182 064 

1620-06.0.055 048 

1620-06.0.079 050 

1620-06.0.082 050 

1620-06.0.229 070 

1620-06.0.234 071 

1620-09.2.030 089 

1620-10.4.010 118 

1620-09.4.023 100 

1620-09.4.027 100 

1620-BE-02X 003 

1620-09.4.006 098 

1620-09.4.007 099 

1620-09.4.045 103 

1620-09.4.050 104 

1620-09.4.039 102 

1620-UG-01X 011 

1620-OG-05X 011 

1620-06.0.227 070 

1620-01.6.125 025 

1620-01.6.090 022 

1620-06.0.155 060 

1620-09.2.011 086 

1620-08.2.001 082 

1620-06.0.178 063 

1620-06.0.097 052 

1620-06.0.052 048 

1620-06.0.215 067 

1620-06.0.038 046 

1620-06.0.193 065 

1620-06.0.172 063 

1620-06.0.056 048 

1620-07.0.060 079 

1620-06.0.021 044 

1620-03.0.003 038 

1620-06.0.155 060 

1620-06.0.142 058 

1620-09.2.071 095 

1620-09.2.077 096 

1620-DG-01X 011 

1620-06.0.167 062 

1620-02.0.038 033 

1620-10.2.005 111 

1620-01.6.117 024 

1620-09.2.037 090 

1620-06.0.235 071 

1620-06.0.095 052 

1620-06.0.171 063 

1620-06.0.016 044 

1620-06.0.136 058 

1620-06.0.123 056 

1620-09.4.062 106 

1620-06.0.217 068 

1620-07.0.050 078 

1620-06.0.223 069 

1620-06.0.180 064 

1620-02.0.014 031 

1620-01.6.138 027 

1620-01.1.030 014 

1620-02.0.038 033 

1620-06.0.008 043 

1620-09.4.028 101 

1620-05.0.032 042 

1620-02.0.011 031 

1620-07.0.014 075 

1620-09.4.015 100 

1620-06.0.169 062 

1620-09.2.079 096 

1620-09.2.057 093 

1620-07.0.065 080 

1620-09.3.018 098 

1620-09.2.030 089 

1620-09.5.002 107 

1620-01.6.045 019 

1620-01.6.098 022 

1620-02.0.055 035 

1620-01.1.006 013 

1620-06.0.160 061 

1620-03.0.005 038 

1620-09.3.018 098 

1620-09.4.038 102 

1620-06.0.178 063 

1620-06.0.128 056 

1620-09.2.040 090 

1620-09.2.041 091 

1620-09.2.042 091 

1620-09.2.021 088 

1620-09.2.008 086 

1620-EO-05X 004 

1620-09.5.005 107 

1620-09.4.063 106 

1620-10.3.049 117 

1620-02.0.052 035 

1620-10.4.011 118 

1620-10.3.038 115 

1620-09.2.037 090 

1620-09.5.004 107 

1620-09.4.004 098 

1620-07.0.058 079 

1620-09.2.063 094 



♦SPACED 



»B 



TITLE 
CONSOLE EVALUATING AND DEBUGGING 
♦CONSTANT PROGBAH. 
CONSTANT RESPOHSE FOR A QUADRATIC* 
CONSTANTS AND VAPOR LIQUID EQUILIBBIUH FBOH+ 
CONSTANTS IN THE NEGATIVE BIBOMIAL* 
CONTENTS. ♦C&XCOLATION OF MINERAL ONIT CELL 
CONTEXT ANALYSIS ON A MOLTIPLE LINE* 
CONTEXT. ♦KBIC - KEIBOBD IB 

CONTEXT. ♦KBIC - KEYBORD IN 

♦CONTINUOUS BEAM ANALYSIS AND STEEL BEAH* 
♦CONTINUOUS BEAM LIVE LOAD DEFLECTIONS. 
♦COBTINUOOS BEAH SERIES - PROGRAMS I THBO IX* 
♦CONTINUOUS FOREST INVENTORY STATISTICAL* 
CONTOURING BITH "E" FORMAT. ♦POST PROCESSOR* 
CONTOURS OF CONSTANT RESPONSE FOR A* 
CONTROL PROCESSOR. ♦1620/1311 AD-APT 
CONTROL PROCESSOR. ♦1620/1311 AOTOSPOT III* 
CONTROL. #A0TOSPOT II POST-PROCESSOR FOB* 
CONTROL. «BSPEC - INVESTIGATE NOBERICALLY+ 
CONTROL. ♦POST PEOCESSOR CONCEPTS FOE THE* 
CONTROLS SEQUENTIAL ADDITIONS AND DISK* 
♦CONVERSION OF KELVIN FUNCTIONS TO THEIR* 
CONVERSION SUBROUTINES. ♦SPS FLOATING POINT 
CONVERSIONS. ♦ASTH-TO-TBP AND TBP-TO-ASTH* 
CONVERT A COHPLEX HATBIX. ♦PROGBAH TO 

♦COOLIBG-LOAD DETEBMINATION FOE BUILDINGS. 
COORDINATE GEOMETRY COGO 1 - CARD. ♦CIVIL* 
COORDINATE GEOMETRY I - DISK. ♦CIVIL* 
COORDINATES (TAPE) . ♦HORIZONTAL ALIGNMENT* 
COPY PROGRAM. ♦1620/1311 DISK PACK 

CORE DOHP PROGRAHS. ♦FIVE-CARD PRINTER 
♦CORES DUMP 402. 
CORRECTION IN CRYSTAL STROCTURE ANALYSIS FOR* 
CORRECTION IN CRYSTAL STROCTURE ANALYSIS. 
CORRECTION IN CRYSTAL STROCTURE ANALYSIS. 
CORRECTION PROGRAM FOR NORHAL - BEAM OB* 
CORRECTION SYSTEM - BESTERN CAROLINA* 
CORRELATED DATA. ♦RIDGE ANALYSIS FOR HIGHLY 
CORRELATED POLYNOMIAL ADJOSTHENT OF AERIAL* 
CORRELATION COEFFICIEBT AND REGRESSION* 
CORRELATION COEFFICIENT MATRIX BITB MISSING* 
CORRELATION COEFFICIENT MATRIX. ♦SIMPLE 
♦CORRELATION COEFFICIENT PROGRAM. 
CORRELATION COEFFICIENT. ♦LINEAR 

CORRELATION COEFFICIENT. tCALCULATION OF* 
CORRELATION COEFFICIENT. tKENDALL'S TAD AND* 
♦CORRELATION COEFFICIENTS. 
♦CORRELATION HATRIX PROGRAH. 
♦CORRELATION HATBIX BITH OPTIONAL FACTOR* 
♦CORRELATION HATRIX BITB OUTPUT IN HATRIX* 
♦COBBELATIOB PBOGBAM FOB SYHMETRIC AND* 
CORRELATION PROGRAM FOR SYMMETRIC AND* 
CORRELATION PROGRAM. ♦VARIABLE FORMAT 

CORBELATIOB PROGRAM. ♦ONE PASS CANONICAL 
CORRELATION BITH MISSING OBSERVATIONS. 
♦COBRELATIOB 40-40. 
CORRELATION. ♦CANONICAL 

CORRELATION. ♦BINARIATB LINEAR 

CORRELATION-POBER SPECTRUH. ♦AUTO 

CORRELATIONS - FIRST OB FIRST AND SECOND* 
♦CORRELATIONS OF ALL PAIR WISE COMBINATIONS* 
CORRELATIONS. ♦PRODUCT HOMENT 

CORRELATIONS. ♦SUM OF SQUARES ABD PRODOCTS, 
COS, SIN AND EXP SOBROOTINES FORTRAN II. 
COSINE FIT-IBM 704 COFIT PROGRAM ADAPTED TO* 
COST SYSTEM. ♦VEHICLE SIHOLATION AND 
COST. ♦INVESTHENT 

COST. ♦POBER PRODUCTION 

COST. ♦PLANT GENERATION FOR GIVES INCREMENTAL 
COUNT PBOGBAH. ♦DOUBLE COUNT PUNCH 

COUNT TABLE OB BAB DATA. ♦TBREE BAY* 
COUNT TABLE OR RAB DATA 
COUNT. 

COONTING USO-II. 
COOPLES POLYNOMIALS EQUATION. ♦CALCOLATION* 
COVARIANCE - SPLIT PLOT FACTORIAL. ♦ANALYSIS* 
COVABIANCE - TBO-FACTOR FACTORIAL. ♦ANALYSIS* 
COVARIANCE - TBO-FACTOR FACTORIAL. ♦ANALYSIS* 
♦COVARIANCE ANALYSIS - COMPLETELY RANDOMIZED* 
♦COVARIANCE ANALYSIS - RANDOMIZED BLOCK* 
COVABIANCE. ♦ANALYSIS OF 

COVARIANCE. ♦ANALYSIS OF VARIANCE AND 

COVARIANCE. ♦FACTORIAL ANALYSIS OF VARIANCE* 
COVAEIANCE-OBEQUAL SOBCLASS FREQUENCIES. 
♦CPNAT ♦CRITICAL PATH NODE AND DUMMY 
♦CRITICAL PATB BODE AND DOMMY ASSIGNMENT* 

CBITICAL PATB SYSTEM NETWORK. ♦LOOP LOCATOR* 
♦CRITICAL PATB/SCBEDULE BAB GRAPH GENERATOR* 

CRITICAL VALUES, FOR P LEVELS OF* 
♦CROSS AND SIHPLE TABULATION PROGRAH C. A. S. 
CROSS REFEREBCED SYMEOL TABIE FOB HONITOB I* 
CROSS SECTION. ♦BASS DIAGRAM MODEL BITB 
CBOSS SOLUTION. ♦WATER FLOB IN A PIPE* 
CROSS-OVER DESIGN. ♦ANALYSIS OF VARIANCE, 
CRODT FOR SOLOTION OF SIMULTANEOUS LINEAR* 
♦CROUT REDUCTION. 
CRYSTAL STROCTURE ANALYSIS FOR* 
CRYSTAL STRUCTURE ANALYSIS. ♦ABSORPTION* 
CRYSTAL STRUCTURE ANALYSIS. ♦TWO-DIMENSIONAL* 
CRYSTALLOGRAPHY. ♦GENERAL THREE DIMENSIONAL* 
♦GENERAL TWO DIMENSIONAL* 
♦INTER AND INTRA-MOLECULAR* 
♦STROCTURE FACTOR* 

♦A PROGRAM TO INDEX 

♦CARD SEARCHING PROGRAH, 

♦REAL ROOTS OF 



USU 22. MBO WAY* 
♦CARD COLOHN PONCH 
♦DIGIT 



CRYSTALLOGRAPHY. 

CRYSTALLOGRAPHY. 

CRYSTALLOGRAPBY. 

CRYSTALS. 

CS3. 

COBIC POLYNOHIALS. 



CULVERT DESIGN. ♦TWIN BOX 

CUMULATIVE BINOMIAL POISSOB NORHAL STUDENT* 
CUHULATIVE FREQUENCIES. ♦PERCENTILE SCORES* 
CURRENT CALCOLATION. ♦ELECTRIC SBOBT CIRCUIT 



CURRENT 
PBOGBAM NO. PAGE 
1620-01.6.107 023 
1620-09.4.044 103 
1620-06.0.049 047 
1620-09.3.015 098 
1620-06.0.117 055 
1620-08.3.004 083 
1620-10.3.032 114 
1620-10.3.016 113 
1620-10.3.041 116 
1620-09.2.017 087 
1620-09.2.067 094 
1620-09.2.053 093 
1620-06.0.043 047 
1620-10.4.013 118 
1620-06.0.049 047 
1620-CN-06X 001 
1620-CB-07X 001 
1620-10.4.010 118 
1620-02.0.065 037 
1620-10.4.011 118 
1620-01.6.134 026 
1620-03.0.008 038 
1620-01.6.053 020 
1620-09.3.006 097 
1620-05.0.032 042 
1620-09.7.012 109 
1620-UG-01X 011 
1620-OG-05X 011 
1620-09.2.027 088 
1620-01.6.104 023 
1620-01.6.146 028 
1620-01.6.020 018 
1620-08.4.017 085 
1620-08.4.014 085 
1620-08.4.016 085 
1620-08.4.002 083 
1620-01.6.117 024 
1620-06.0.077 050 
1620-09.2.049 092 
1620-06.0.178 063 
1620-06.0.097 052 
1620-06.0.052 048 
1620-06.0.215 067 
1620-06.0.038 046 
1620-06.0.193 065 
1620-06.0.172 063 
1620-06.0.021 044 
1620-06.0.162 061 
1620-06.0.145 059 
1620-06.0.104 053 
1620-06.0.114 055 
1620-06.0.121 056 
1620-06.0.205 066 
1620-06.0.214 067 
1620-06.0.175 063 
1620-06.0.015 044 
1620-06.0.137 058 
1620-06.0.188 065 
1620-06.0.147 059 
1620-06.0.064 049 
1620-06.0.217 068 
1620-06.0.022 044 
1620-06.0.040 047 
1620-07.0.038 077 
1620-06.0.142 058 
1620-09.2.032 089 
1620-10.3.021 114 
1620-09.4.011 099 
1620-09.4.036 102 
1620-06.0.230 070 
1620-06.0.079 050 
1620-06.0.082 050 
1620-06.0.235 071 
1620-06.0.130 057 
1620-07.0.029 076 
1620-06.0.023 044 
1620-06.0.024 044 
1620-06.0.025 045 
1620-06.0.080 050 
1620-06.0.107 054 
1620-06.0.032 045 
1620-06.0.109 054 
1620-06.0.224 069 
1620-06.0.132 057 
1620-10.3.030 114 
1620-10.3.030 114 
1620-10.3.047 117 
1620-10.3.020 113 
1620-06.0.124 056 
1620-06.0.146 059 
1620-01.1.033 015 
1620-09.2.043 091 
1620-09.7.008 109 
1620-06.0.113 054 
1620-05.0.035 042 
1620-05.0.021 041 
1620-08.4.017 085 
1620-08.4.014 085 
1620-08.4.016 085 
1620-08.4.006 084 
1620-08.4.005 084 
1620-08.4.008 084 
1620-08.4.004 084 
1620-08.3.005 083 
1620-01.6.070 021 
1620-03.0.009 038 
1620-09.2.051 092 
1620-06.0.128 056 
1620-06.0.115 055 
1620-09.4.045 103 



XVI 



CURRENT 



JtBIC (KBYBOBD-IB-COBTEXT) INDEX 



TITLE PROGRAM NO. PAGE 

CURRENT CALCULATIONS FOB RADIAL DISTRIBUTION* 1620-09. 4. 056 105 
CURRENTS IN ELECTRIC CIRCUITS. ♦SOIOTIOBS* 1620-09.4.039 102 
♦CURVE ERIDGE PROGRAM. 1620-09.2.010 086 

CURVE DATA PROGRAM. #SPS TRAVERSE AND 1620-09.2.018 087 

CURVE DATA. ♦HORIZONTAL 1620-09.2.062 094 

CURVE FIT. #LEAST SQUARE DIFFERENCES, BOB* 1620-06.0.181 064 
CURVE FITS HYPERBOLIC, EXPOBEBTIAL, POWEB* 1620-07.0.019 076 
♦CURVE FITTING (UCRBI 0065). 1620-06.0.118 055 

CURVE FITTING - NEWTOBS DIVIDED DIFFERENTIAL* 1620-07.0.023 076 
♦CURVE FITTING - SIBOLATED PLANT RECORD* 1620-09.1.009 099 
CURVE FITTING EI LEAST SQUARES. ♦FOUR TYPE* 1620-06.0.157 060 
CURVE FITTING PBOGRAB. #NON-LINEAR* 1620-06.0.131 057 

CURVE FITTING USING LEBGEBDRE POLYNOMIALS. 1620-07.0.007 071 
CURVE LAYOUT. ♦SPIRAL 1620-09.2.075 096 

CURVE PROGRAB. ♦BACKWATER 1620-09.2.028 088 

CURVE PROGRAB. iOGIVE FREQUENCY 1620-06.0.127 056 

CURVES FOR TBE NEGATIVE BIBOBIAI* 1620-06.0.116 055 

CURVES TO FIRST ORDER LAG WITH OR WITHOUT* 1620-07.0.075 081 
CYCLE HEAT BALARCE. ♦TURBINE 1620-09.5.009 108 

CYCLE LENGTH FOR FIXED TIME TRAFFIC SIGNALS. 1620-09.2.083 097 
CYCLE. ♦OVERLOAD RATINGS OF 65 DEGREES* 1620-09.1.060 105 
CYCLE. ♦TRANSFORMER RATINGS BASED ON LOSS OF* 1620-09.1.032 102 
CYCLES. ♦TRANSFORBER RATING FOR NORBA1 AND* 1620-09.1.028 101 
♦C1D - AN OPERATING SYSTEH FOR EDQ FORTRAN. 1620-02.0.059 036 
DAIRY BANAGEBENT GAHE. ♦BOILERMAKER 1620-11.0.048 124 

DARCY METHOD. ♦PIPE FRICTIOB HEAD LOSS* 1620-09.2.039 090 
DATDIF. ♦DATE DIFFEREBCE SDBROUTIBE - 1620-01.6.111 021 

♦DATE ANALYSIS PROGRAB. 1620-06.0.101 053 

♦DATE DIFFERENCE SUBROUTINE - DATDIF. 1620-01.6.111 024 

♦DATE INTERPRETER ABD PERPETUAL CALENDAR. 1620-11.0.015 123 
DATING ROUTINE. #PERT 1620-10.3.011 113 

♦DATBAN - DATA BABIEOLATION. 1620-01.6.149 029 

♦DBD (DAYS EETWEEH DATES) SDBROUTIBE. 1620-01.6.047 019 

♦DDSR - DISK DATA STORAGE ROUTIBE. 1620-01.1.036 016 

♦DEAD LOW BIAB DEFLECTIOBS. 1620-09.2.036 090 

DEAD TIHE. ♦LEAST SQUARES FIT OF RESPONSE* 1620-07.0.075 081 
DEBATE TOURNAMENT. #A COMPUTER- PROGRAB TO* 1620-13.0.026 128 
DEBUGGIBG. ♦SPACED - SELF-LOADIHG+ 1620-01.6.107 023 

DECIBAL POINT. ♦FIXED POINT DIVISION OR* 1620-03.0.012 039 
DECISION EXERCISE. ♦FARB OPERATION SIBULATOE* 1620-10.2.010 112 
DECISION-BAKING EXERCISE. ♦BOSTON COLLEGE 1620-10.2.005 111 
DECKS ON 11143 PRINTER. ♦TABULATE NDBERIC DATA 1620-13.0.031 129 
DECOMPOSITION. ♦VECTOR COBPOSITION AM 1620-07.0.065 080 
DBF, PLOT, BRIT. ♦REIOCATABLE SDBROUTIBES 1620-07.0.053 079 
DEFIBED INCEEHZBTS OF TIBE. ♦STUDENT* 1620-10.3.017 113 

DEFINITE INTEGRAL OF A REAL FUNCTION USING* 1620-07.0,013 077 
DEFLECTIOBS AND FORCES OF A VIERATING BEAfl. 1620-09.5.006 107 
♦DEFLECTIOBS IN HINGED SPABS BY TBE COBJUGATE 1620-09.2.063 094 
DEFLECTIONS. ♦DEAD LOB BEAB 1620-09.2.036 090 

DEFLECTIOBS. ♦CONTINUOUS BEAfl LIVE LOAD 1620-09.2.067 091 
♦DEFT - DISK EXECUTION OF FORTRAB TRABSFER. 1620-01.1.034 015 
DEGREES CENTIGRADE RISE TRANSFORBERS BASED* 1620-09.4.060 105 
DEBAND FUNCTIONS. ♦ECONCHIC CRDER QUANTITIES* 1620-10.1.011 110 
*DEflONSTRATION ♦HIH ABD HER 1620-11.0.019 119 

DEBOHSTRATION OF THE IBB 1620. ♦DEBOPAK - A* 1620-11.0.029 120 
DEBOBSTRATIOB PROGRAB - ADP. ♦ACCOUBTIBG 1620-11.0.024 120 
DEMONSTRATION PROGRAB IB LOGIC TO DETERBIBE* 1620-13.0.008 126 
♦DEBOBSTRATION PROGRAB TO PRIBT OUT PRIHE+ 1620-11.0.040 122 
DEBONSTRATIOB PROGRAB TO PUNCH BLOCK* 1620-11.0.041 122 

DEBOBSTRATIOB PROGRAB. ♦PERFECT BUHBEE 1620-11.0.030 120 

DEBONSTRATION. ♦TIC-TAC-TOE 1620-11.0.012 119 

DEBONSTRATION. ♦BOUSE IB THE HAZE 1620-11.0.051 124 

DEBONSTRATION. ♦ELEBENTARY RUBBER THEORY 1620-11.0.038 122 
DEMONSTRATOR. ♦PRIHE NUMBER 1620-11.0.050 124 

DESONSTBATOR. ♦EEC BASEBALL SIBULATION AND 1620-11.0.032 121 
♦DEBOPAK - A FUNCTIONAL DEBOBSTRATIOB OF THE* 1620-11.0.029 120 
♦DEPAUB MACHINE LANGUAGE INTERPRETER. 1620-01.6.109 023 

DERIVATIVES BY BEBTOBS F.I.B.. ♦POLYNOBIAL* 1620-07.0.055 079 
♦DESCRIPTIVE STATISTICS. 1620-06.0.211 067 

DESIGN - SIMPLE OR MULTIPLE USU 10. 1620-06.0.107 054 

DESIGN - SIMPLE OR BUITIPIE USU 29. 1620-06.0.080 050 

DESIGN PROGRAM FOE THE IBB 1620 DATA* 1620-09.2.050 092 

DESIGN SYSTEM 20K. ♦DTB 1620-09.2.016 087 

DESIGN SYSTEM 40K. ♦DTB 1620-09.2.019 087 

DESIGN USD 51. ♦ANALYSIS OF VARIANCE -♦ 1620-06.0.083 051 
DESIGN. ♦LOB-PASS FILTER 1620-09.4.041 103 

DESIGB. WHIN BOX CUIVERT 1620-09.2.051 092 

DESIGN. ♦TRABSBISSION POWER 1620-09.2.061 094 

DESIGN. ♦TRANSMISSION TOWER 1620-09.2.015 087 

DESIGN. ♦WELDED STEEI CCBPOSITE EEAB 1620-09.2.079 096 

DESIGB. ♦ANALYSIS OF VARIANCE, CROSS-OVER 1620-06.0.113 054 
DESIGN. ♦ANALYSIS OF VARIANCE 1620-06.0.161 061 

DESIGN. ♦ABALYSIS OF VARIANCE - BALABCED* 1620-06.0.062 049 
DESIGN. ♦ANALYSIS OF VARIANCE, SPLIT-PLOT* 1620-06.0.069 049 
DESIGB. ♦COBTIBUCUS BEAM ABALYSIS AND STEEL* 1620-09.2.017 087 
DESIGN, DYNABIC LOAD. ♦COMPRESSION SPRING 1620-09.5.002 107 
DESIGN, INDIVIDUAL ABD COBB. STATION* 1620-06.0.123 056 

DESIGB, NO SUE-SAMPLES. ♦ANALYSIS OF* 1620-06.0.070 050 

DESIGN-USU 63. MULTIVARIATE ABALYSIS OF* 1620-06.0.139 058 
DESIGB-USU62. MULTIVARIATE ANALYSIS OF* 1620-06.0.138 058 
DESK CALCULATOR. ♦EXPENSIVE 1620-11.0.043 123 

DETERMINANT. ♦EVALUATION OF A 1620-05.0.019 041 

♦DETERMINATE TRUSS ANALYSIS. 1620-09.2.058 093 

DEVIATION ABD IBTERCORRELATION PROGRAM. 1620-06.0.239 072 
DEVIATION AND VARIANCE. MEAN STANDARD 1620-06.0.051 047 

DEVIATION PROGRAM. ♦VARIABLE FORMAT T TEST* 1620-06.0.206 066 
DEVIATION SORT PROGRAM HITB FLEXIBLE INPUT. 1620-06.0.243 072 
DEVIATION. ♦KARBEB METHOD OF ANALYSIS* 1620-06.0.212 067 
DEVIATION, AND VARIANCE BY ROBS AND COLUMNS. 1620-06.0.136 058 
DEVIATION, SUA 3F SQUARES, N. ♦MEAN AND* 1620-06.0.177 063 
DIAGONAL BODEL (40K) . ♦PORTFOLIO SELECTIONS - 1620-10.3.035 115 
DIAGOBALIZATIOB, AUTO BIBIMIZATIOB OF ERROR. 1620-05.0.015 040 
DIAGRAM MODEL WITH CROSS SECTION. ♦MASS 1620-09.2.043 091 
DIAGRAM OF DATA FREQUENCIES. ♦SCATTER 1620-06.0.228 070 

DIAGRAM OUTPUT. ♦ELECTRIC LOAD FLOW SISGLE+ 1620-09.4.049 104 
DIAGRAM PRCGRABS. ♦VIGBETTED APERATURE ABD* 1620-EO-03X 004 
DIAGRAM. ♦PLOT A BLOCK 1620-01.6.131 025 

DICE - ♦GABE OF 1620-11.0.025 120 

♦DICHOTOMIZE DATA. 1620-06.0.144 059 

DICTIONARIES. ♦ALPHABETIC INDEXER ABD LISTER* 1620-10.3.038 115 



ELECTRIC 

TITLE PROGRAM NO. PAGE 

DIFFERENCE PROGRAM. ♦AB SPS VARIATE 1620-06.0.187 065 

DIFFEREBCE SUBROUTINE - DATDIF. ♦DATE 1620-01.6.111 024 

DIFFEREBCES. ♦BDLTIPLE RANGE TEST OF BEAB 1620-06.0.036 046 

DIFFEREBCES, NOB LIBEAR CURVE FIT. ♦LEAST* 1620-06.0.181 064 

DIFFERENTIAL EQUATION BY MILNE'S METHOD* 1620-04.0.004 039 

DIFFEREBTIAL EQOATIOB. ♦SOLUTIOB FOR IBITIAL* 1620-04.0.001 039 

DIFFEREBTIAL EQUATION. ♦SOLUTION FOR INITIAL* 1620-04.0.002 039 



1620-04.0.006 039 
1620-07.0.023 076 
1620-07.0.034 076 
1620-08.2.001 082 
1620-08.2.003 083 
1620-06.0.130 057 
1620-02.0.053 035 
1620-02.0.054 035 



1620-09.5.005 107 
1620-01.6.125 025 
♦DDSR - 1620-01.1.036 016 
♦BOBITOR I 1620-01.6.143 027 
1620-01.6.158 030 
1620-01.1.034 015 



DIFFERENTIAL EQUATIONS. ♦SOLUTION OF N+ 
DIFFERENTIAL FORMULA. ♦POLYNOMIAL CURVE* 
♦DIFFERENTIATION OF AN EBPIRICAL FUBCTIOB. 
DIFFUSIOB CODE FOB THE IBB 1620. ♦WHY A* 
DIFFUSIOH SYSTEM FOR THE IBB 1620. ♦MAIDS -* 
♦DIGIT COUBTING USU-II. 
DIGITAL ANALOG SIMULATIOB PROGRAB. ♦JANET 
DIGITAL ANALOG SIBULATION PROGRAB. ♦JANET-II 

DIGITAL COBPUTERS - PEOCOM. ♦PROGRAB CATALOG* 1620-10.3.049 117 

♦DIGITAL TOOL FOB PLABNIBG RADIAL* 1620-09.4.043 103 

DIB ABD EQDIVALEBCE TABLE TEST. ♦MONITOR 1620-01.6.108 023 

DIBENSIOBAL FODBIEB SYBTHESIS PROGRAB FOR* 1620-08.4.005 084 

DIBEBSIOBAL FOUBIEE SYBTHESIS PBOGRAB FOR* 1620-08.4.006 084 
♦DIP - DISK INSPECTION PROGRAM. 1620-01.6.141 027 

♦DIRECT GEODETIC PROBLEB. 1620-08.1.004 082 

DIRECT GEODETIC PROBLEB. ♦HELMERTS 1620-07.0.068 080 

DISCRIMINANT ANALYSIS. ♦SEVERAL GROUP 1620-06.0.249 073 

DISK ABD PRIBTER, ♦DISKWIC - A KWIC IBDEXER* 1620-10.3.051 117 

DISK CAB COBPUTATIOBS. ♦FABILY OF COBPOTER+ 
♦DISK CLEANER. 

DISK DATA STORAGE ROUTINE. 

DISK DUBP PATCH. 
♦DISK DUMP. 

DISK EXECUTIOB OF FORTRAN TRANSFER. ♦DEFT 

DISK INSPECTION PBOGRAB. ♦DIP - 1620-01.6.141 027 

♦DISK IOCS EOUTIBES, COBTBOLS SEQUEBTIAL* 1620-01.6.134 026 

DISK ORIENTED EQOATIOB SOLVER. ♦DOES - 1620-05.0.037 042 

DISK PACK COPY PROGRAM. ♦1620/1311 1620-01.6.104 023 

DISK PACK. ♦PICTURE OF 1620-01.6.145 028 

♦DISK PACKER FORMOBITOB II. 1620-01.6.150 029 

♦DISK PACKER. 1620-01.6.137 026 

DISK SUBRODTIBES TO READ OR WRITE IN OTBEB* 1620-01.6.151 029 

DISK SYSTEH FOB 1620. ♦PDQ FORTRAN 1620-02.0.061 036 

DISK UTILITY PACKAGE. ♦DISK IOCS ROUTINES,* 1620-01.6.134 026 

DISK. ♦CIVIL ENGINEERING COORDINATE GEOMETRY* 1620-UG-05X 011 
♦DISKWIC - A KWIC INDEXEE FOR DISK AND* 1620-10.3.051 117 

DISSOCIATION. ♦ADIABATIC FLAME TEMPERATURE, 1620-09.3.011 097 

DISTANCE BETWEEN POPULATIONS. ♦SWEEP OUT* 

DISTANCE CALCULATION IN X-RAY* 

DISTILLATION CONVERSIONS. ♦ASTM-TO-TBP AND* 

DISTILLATION. tTHIELE-GEDDES METHOD FOR* 

DISTRIBUTION AND FOCUS SHIFT COBPUTATIOBS* 

DISTRIBUTION FACTOR CALCULATION AND* 

DISTRIBUTION GENERATOR PBOGRAB - SINGLE ABD* 

DISTRIBUTIOB LIBES. ♦VOLTAGE PROFILE ABD* 

DISTRIBUTION PROGRAB - SINGLE AND DOUBLE* 

DISTRIBUTION PROGRAB. ♦TEST SCORE FREQUENCY 1620-06.0.232 071 

DISTRIBUTIOB SYSTEBS. ♦DIGITAL TOOL FOB* 1620-09.4.043 103 

DISTRIBUTIOB. ♦EQUIPMENT AND PROJECT TIME 1620-01.6.114 024 



1620-06.0.208 066 
1620-08.4.008 084 
1620-09.3.006 097 
1620-09.3.012 097 
1620-EO-05X 004 
1620-09.4.029 101 
1620-06.0.095 052 
1620-09.4.056 105 
1620-06.0.171 063 



DISTRIBUTION. #ESTIMATION OF CONSTANTS IN* 



1620-06.0.117 055 



DISTRIBUTION. IPOWER CURVES FOR TBE NEGATIVE* 1620-06.0.116 055 



DISTRIBUTIOBS - SINGLE ABD DOUBLE COLUMN. 

DISTEIBOTIOBS HITH TBE BEYflAN A FORB0LA. 

DISTRIBUTIOBS WITH THE POISSOB WITH ZEBOES. 

DISTRIBUTIONS. ♦FITTING POISSOB BIBOBIAL 1620-06.0.245 073 

DISTRIBUTIONS. ♦FITTING NEGATIVE BIBOBIAL 1620-06.0.248 073 



1620-06.0.016 044 
1620-06.0.247 073 
1620-06.0.246 073 



1620-06.0.115 055 

1620-07.0.023 076 

1620-03.0.012 039 

1620-CX-04X 003 

1620-10.4.011 118 

1620-10.4.010 118 
1620-09.4. 



DISTRIBUTIONS, AND CUMULATIVE FREQUENCIES 
DIVIDED DIFFERENTIAL FORHULA. ♦POLYNOMIAL* 
DIVISION OR MULTIPLICATION REGULATOR FOB* 
♦DRAFTING SISTEB. 
DRILL PRESS WITH HDGES BC-21 1 BACHINE TOOL* 
DRILL WITH STEPPING SWITCH CONTROL. 

DROP CALCULATION IN 2 PASSES. ♦RADIAL THREE* 1620-09.4.020 1 

DROP CALCULATIONS. ♦RADIAL THREE PHASE LINE 1620-09.4.018 1.. 

♦DSAVE. 1620-07.0.078 082 

♦DTB DESIGB SYSTEM 20K. 1620-09.2.016 087 

♦DTB DESIGN SYSTEM 40K. 1620-09.2.019 087 

♦DTB LOCATION SYSTEM. 1620-09.2.026 088 

DUMMY ASSIGNMENT TECHNIQUE PBOGRAB. 1620-10.3.030 114 

DUBP PATCH. ♦BOBITOR I DISK 1620-01.6.143 027 

DUMP PROGRAMS. ♦FIVE-CARD PRINTER CORE 1620-01.6.146 028 

DUBP 402. ♦CORES 1620-01.6.020 018 

DUBP. ♦DISK 1620-01.6.158 030 

DUMP. ♦ABL BBEBONICS 1620-01.6.022 019 

DUBPER. ♦CAREFREE PROGBAB 1620-01.6.142 027 

♦DUBCABS BULTIPLE RABGE TEST, USING HARTEES+ 1620-06.0. 1 24 056 

DYBAflIC LOAD. ♦COBPRESSIOB SPRING DESIGB, 1620-09.5.002 107 



♦DYNAMIC TRACE PROGRAM FOR THE IBM COBPUTER 

♦EARTHWORK PLOT. 

♦ECONOMIC ANALYSIS OF PLANS - OUTPUT 1 ABD* 

ECOBOBIC CONDUCTOR SIZE* 
♦ECOBOBIC ORDER QUANTITIES FOR LINEAR DEMAND* 

ECONOMIZATION OF PCLYBOBIALS. 
♦EDIT SUBROUTINE. 

EDIT SUBBOUTIBE. 
♦EDIT. 



1620-01.4.008 017 
1620-09.2.074 095 
1620-10.3.010 113 
1620-09.4.004 098 
1620-10.1.011 110 
♦CHEBYCHEV 1620-07.0.047 078 
1620-01.6.095 022 
♦GENERAL 1620-01.6.128 025 
1620-01.1.024 014 



EDITOR. ♦STUFF OUTPUT 1620-13.0.027 128 

EDUCATIONAL COMPUTER FOR INSTRUCTION IB* 1620-13.0.015 127 
EDUCATIONAL COBPUTER FOB INSTRUCTION IN* 1620-13.0.016 127 
EDUCATIONAL COMPUTER FOR INSTRUCTION IN* 1620-13.0.017 128 
EDUCATIONAL COMPUTER FOR INSTRUCTION IB* 1620-13.0.018 128 
EDUCATOR. ♦HOPE/NIB OBE FILE 1620-11.0.055 125 

♦EDWARDS PERSONAL PREFEBEBCE TEST SCORIBG BY* 1620-06.0.141 058 
EFFICIEBCY PROGRAM. ♦STEAfl ABD WATER* 
EIGEBVALUES AND EIGENVECTORS OF ZV EQUALS* 
EIGEBVECTORS OF ZV EQUALS LAV. ♦CALCULATIOB* 
ELECTRIC CIRCUITS. ♦SOLUTIONS FOR* 

♦ELECTRIC LOAD FIOW SIBGLE LIBE DIAGRAB+ 
ELECTRIC LOAD FIOW. 

♦ELECTRIC POWER FLOW 



♦ELECTRIC POWER FLOW III. 

♦ELECTRIC SHORT CIRCUIT CUBREBT CALCULATIOB. 

♦ELECTRIC TROUBLE ABALYSIS. 



1620-09.7.007 10 
1620-05.0.016 041 
1620-05.0.016 041 
1620-09.4.039 102 
1620-09.4.049 104 
♦SCALAE 1620-09.4.053 105 
1620-09.4.037 102 



1620-09.4.048 104 
1620-09.4.045 103 
1620-09.4.059 105 



XVII 



ELECTRICAL 

TITLE 

(ELECTRICAL PIELD INTENSITY PATTERNS-DRIVEN* 

(ELECTRICAL NETWORK REDUCTION. 

(ELECTRONIC CIRCUIT ANALYSIS PROGRAM. 

•ELEMENTARY GEBNAN-TO-ENGLISH TRANSLATION. 

(ELEBENTABY GEBNAN-TO-ENGLISH TBANSLATION. 

(ELEMENTARY NUNEEB THEORY DEMONSTRATION. 

(ELEMENTS OF A POLYHEDRON (CRYSTAL) . 
ELEVATIONS. (ROADWAY 

ELEVATIONS. (SKEWED BRIDGE 

EHERGENCT CABLE EATINGS. (NORMAL ABE 

EMERGENCY OFEBATIOH BITH COMPLEX LOAD* 
EBERGERCY OPEBATIOB. •TRANSFORMER BATING FOB* 
EBITTIBG. tCABE REPRODUCER AND LISTEB BITH* 
EBPIBICAI FUNCTION. «DIFFERENTIATION OF AB 
EBB ALL BOSIC PBOGBABS. »VIBT0OSO - THE* 
END-POINT DETEBBINATION. (REED-BOENCH 50* 
ENEBGY DISTBIBDTIOB AND FOCUS SHIFT* 
EBGIBEEEIBG COORDINATE GEOBETEY COGO 1 -* 
ENGINEEBING COOEDIBATE GEOBETEY I - DISK. 
EBGIBEEBING USING THE DABCY BETHOD. (PIPE* 
EQUAL B. #ANALYSIS OF VABIANCE, NBANS, AND* 
EQUALS LAV. ((CALCULATION OF EIGENVALUES AND* 
EQUATION BY HIINE'S BETHOD USING BUBGE* 
EQUATION IN ONE VAEIABLE. (CALCULATION OF* 
EQUATION SOLUTION AND BATBIZ INVEBSION BITH* 
EQUATION SOLUTION. (SIBULTANEOUS 

EQUATION SOLVES. #DOES - DISK OBIENTED 



KWJC IKEYBOBD-IN- CON1E XT) INDEX 



EQUATION. 
EQUATION. 
EQUATION. 
EQUATION. 
EQUATION. 
EQUATION. 
EQUATION. 



EQUATIONS. 
EQUATIONS. 
EQUATIONS. 
EQUATIOBS. 
EQUATIONS. 



•BOOTS OF POLYBOBIAL 
•CALCULATION OP BOOTS* 
•CALCULATION OF BOOTS* 
•CALCULATION OF THE BEAL BOOTS OF* 
•LEAST SQUABES FIT OF YAPOB* 
•SOLUTION FOB INITIAL VALUE* 
•SOLUTION FOB INITIAL VALUE* 
EQUATIONS IN N BEAL VAEIABLES. •SOLUTION OF* 
EQUATIONS PBOGBAB. *CONIC 

EQUATIONS SOIUTICN. •BOSES - BAXIBUB ONE* 
EQUATIONS. *SOIUTION OF SIMULTANEOUS LINEAE 
EQUATIONS. •CAICULATION OF THE REAI BOOTS OP* 
•BATEIX INVEBSION AND SOLUTION OF* 
•BATEIX INVEBSION AND SOLUTION OF* 
•SOLUTION OP HOBOGENECUS AND* 
•SOLUTION OF N SIHULTANEOUS+ 
•SUBROUTINE CBOUT FOB SOLUTION GF+ 
EQUI-INC1INATIOB SETTING. tlBTENSITY* 
EQUILIBBIUB COBPOSITION AND TEBEEEATUBE OF* 
EQUILIBRIUM EBCB AZEOTROPE DATA. 
•EQUIPBENT AND PROJECT TIBE DISTEIBUTION. 
EQUIVALENCE TAELE CABD OUTPUT. •BONITOB 
EQUIVALENCE TABLE TEST. tBONITOB DIB AND 
•EQUIVALENT PIPE LENGTHS. 

•EBEOE FUNCTION SUBBOUTINE FOE PDC FOBTBAB* 
EBEOE FUNCTION SUBBOUTINE. #A VAEIABLE* 
EBEOE. (BADAB - HATBIX DIAGONALIZATION, AUTO* 
ESIIHATES OF BEAN AND STANDABD DEVIATION. 
•ESTIBATIOB OP CONSTANTS IN THE NBGATIVE* 
EVALUATING ABD DEBUGGING. (SPACED -♦ 
EVALUATIOB AND BEVIEN TECHNIQUE. »FEET -+ 
•EVALUATION OF A DETEEBINANT. 
•EVALUATION OF POWER TBANSFOEBEE IOSSES. 
EVALUATION PEOGEAH. #FINANCIAL 

EXACT BEAN AND VABIANCE Op CBI SQUABE, WHEN* 



EXACT BETHOD. #FISHEBS 

EZACT PROBABILITY FOB A 2X2 TABLE. (FISHERS 

•EXAMINATION ASSEBBLI PBOGBAB. 
EXABINATION SCHEDULING SYSTEB 20K. *FINAL 
EXABINATION SCBEDULING SYSTEB 10K. (FINAI 
EXABINATION SCHEDULING SYSTEB 60K. »FINAL 
EXABIBATIOB. (SCRAMBLE - COBPUTEE* 
EXECUTE AND CONTBOL. »INSPEC - INVESTIGATE* 
EXECUTION OF FCETBAN TBANSFEB. »DEFT - DISK 

•EXECUTIVE GABE. 

•EXECUTIVE GABE. *TBE 

EXEBCISE. (BOSTON COLLEGE DECISION-BAKING 
EXEBCISE. »FABB OPEBATION SIBULATOB AND FAEB* 
EXERCISE/CARD/. •BONABDS - A BUSINESS* 
EXP SUBROUTINES FOBTEAN II. JEEICCATABLE* 
EXPANSIONS OF PASSIVE ONE-POBT NETNOEKS. 
EXPECTATIONS ABE SBALL. »THE EXACT BEAN AND* 

•EXPENSIVE DESK CALCULATOB. 
EXPEBIHENTS. »JNALYSIS OF 2 - LEVEL FACTOBIAL 
EXPLICIT DECIBAL POINT. #FIXED POINT* 
EXPLODEB AND STUDENT SCHEDULING DANDBOOK. 
EXPONENTIAL NUHBEB GENEBATOE SUEPBOGBAB. 

• EXPONENTIAL SBCOTHING (FOBECASTING) . 

•EXPONENTIAL SBOOTHING PBOGBAB. 
EXPONENTIAL, PONEB FUNCTIONS.. »THEEE-IN-ONE* 

•EXTENDED BONITOB SYSTEB (BBS) . 

•EXTBEBE-POINT SOLUTIONS FOE BECTANGULAB* 
F.I. B.. «POLYNCHIAL GENERATION ABD* 

♦FACTOE ANALYSIS - CENTEOID BETHOD. 
FACTOE ANALYSIS AND ROTATION OP FACTOBS. 

•FACTOE ANALYSIS BY THE CENTEOID BETHOD.. 
FACTOE ANALYSIS USING HOTELLINGS ITEBATIVE+ 

•FACTOE ANALYSIS-PEINCIPAL COHPONENTS I AND* 
FACTOE CALCULATION AND APPLICATION. *NET»OEK* 
FACTOE CALCULATION IN X-BAY CBYSTAILOGBAPHY. 
FACTOE FACTOBIAL ANALYSIS OF VABIANCE. *THBEE 
FACTOR TABLES. •INTERPOLATION OF ATOBIC+ 

•FACTORIAL ANALYSIS OF VARIANCE AND* 

•FACTOBIAL ANALYSIS OF VABIANCE. 
FACTOBIAL ANALYSIS OF VARIANCE. #THBEE FACTOR 
FACTORIAL DESIGN. #ANALYSIS OF VARIANCE,* 
FACTOBIAL EXPEBIHENTS. ^ANALYSIS OF 2 - LEVEL 
FACTOBIAL. »ANALISIS OF COVAEIANCE - SPLIT* 
FACTOBIAL. #ANALYSIS OF COVARIANCE -+ 
FACTOBIAL. JANALYSIS OF COVARIANCE -♦ 
FACTORIAL. #ANALYSIS OF VABIANCE - 
FACTOBIAL. ^ANALYSIS OF VABIANCE - 
FACTOBIAL. ^ANALYSIS OF VABIANCE - TNO-PACTOB 
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1620-EE- 
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1620-11. 

1620-11. 
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1620-10. 
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1620-09. 

1620-CS 

1620-06 

1620-06 

1620-06 

1620-13 

1620-1 

1620-10 

1620-10 

1620-13 

1620-02 

1620-01 

1620-11 

1620-11 

1620-10 

1620-10 

1620-11 

1620-07 

1620-09 

1620-06 

1620-11 

1620-06 

1620-03 

1620-10 

1620-06 

1620-10 

1620-1 

1620-07 

1620-01 

1620-07 

1620-07 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 

1620-09 

1620-08 

1620-06 

1620-08 

1620-06 

1620-06 

1620-06 

1620-1 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 



NO. PAGE TITLE 

1.061 106 FACTOBIAL. (ANALYSIS OF VABIANCE -♦ 

1.058 105 FACTOBS AFFECTING OPTIBUH PLANT SIZE. 

02X 003 FACTOBS. •TRANSBISSION LOSSES AND PENALTY 

0.051 125 FACTORS. *COBBELATION HATRIX NITH OPTIONAL* 

0.053 125 •FABILI OP COBPUTER PBOGBABS FOB DISK CAB* 

0.038 122 FAP (FOR THE IBB 1620 DIGITAL COBPUTER). 

1.015 085 FARB BANAGEBENT DECISION EXEBCISE. (PARS* 
2.070 095 FARB SUPPLY BUSINESS BANAGEBENT GABE. 
2.009 086 FAULT CUBBENT CALCULATIONS FOB RADIAL* 
1.031 101 FEN-GROUP DIFFUSION CODE FOR THE IBB 1620. 
1.028 101 FIELD INTENSITY PATTEBNS-DBIVEN ANTENNA* 

1.012 099 FIELD NOTE SEDUCTION. (1620 BODEL 1 

3.016 017 FIELD SQUARE BOOT SUBROUTINE. *VARIABLE 
0.031 076 FILE EDUCATOR. ♦NOPE/NIB ONE 
0.016 123 FILE NO. 1620-FO-037. tBESSEL FUNCTION* 
0.150 060 FILTEB DESIGN. H.OW-PASS 
05Z 001 »FZHAHCZAL EVALUATION PBOGBAB. 

01X 011 FINDEB. #BOLECULAB PEAK 

051 011 JFZNZTE FODBIEB ANAIYSIS; A. COEFFICIENTS* 

2.039 090 FINITE SEBIES OB SABPLE DATA. (BASIC* 

0.110 058 FIRST-ORDER DIFFERENTIAL EQUATIONS. 

0.016 011 WISHERS EXACT HETBOD. 

0.001 039 •FISHERS EXACT PROBABILITY FOR A 2X2 TABLE. 

0.033 076 PIT OF RESPONSE CURVES TO FIRST ORDER LAG* 

1.015 100 FIT OF VAPOR PRESSURE DATA BY THE ANTOINB* 
0.002 010 FIT. »LEAST SQUABE DIFFEEEBCES, NON LINEAB* 
0.037 012 PIT-IBH 701 COFIT PHGGEAH ADAPTED TO THE IBB* 
0.036 077 FITS HYPERBOLIC, EXPONENTIAL, PONER* 
0.029 076 FITTER. (SIXTEEN-TNENTI UNIVERSAL FUNCTION 
0.032 076 FITTING (UCEBL 0065). ♦CURVE 
0.017 075 FITTING - NEWTONS DIVIDED DIFFERENTIAL* 

3.016 098 FITTING - SIBULATED PLANT RECORD BETHOD* 
0.001 039 FITTING BY LEAST SQUARES. *FOUR TYPE* 
0.002 039 »FITTING DISTRIBUTIONS NITH THE HEYHAN A* 
0.021 011 tFITTING DISTRIBUTIONS NITH THE POISSON WITH* 
0.058 079 •FITTING NEGATIVE BINOBIAL DISTRIBUTIONS. 
0.010 013 tFITTING POISSON BINOBIAL DISTRIBUTIONS. 
0.007 010 FITTING PBOGBAB. #NON-LINEAR LEAST-SQUABES* 
0.011 077 FITTING USING LENGENDBE POLYNOHIALS. 
0.039 013 (FIVE-CARD PRINTER CORE DUBP PROGBABS. 
0.037 016 tFIXED POINT DIVISION OB MULTIPLICATION* 
0.020 011 FIXED POINT.. »SINE/COSINE SUBROUTINE - 
0.006 039 FIXED TIBE TRAFFIC SIGNALS. «THE SELECTION* 
0.035 012 FLAHE TEMPERATURE, NO DISSOCIATION. 
1.002 083 FLANGED TAPERED HOB. *S-109 STRESS ANALYSIS* 
3.018 098 (FLEXIBLE CARD BEAD BOUTINE. 
3.015 098 FLEXIBLE INPUT. •HISSING DATA BEAN AND* 
6.111 021 FLOAT FORTRAN PROCESSING SYSTEB. «AUTO 

3.013 017 »FLOATING COBPARE SUBROUTINE FOR SPS. 
6.108 023 FLOATING POINT ARITHHETIC SUBROUTINES. 
3.011 098 FLOATING POINT COBVEBSIOB SUBROUTINES. tSPS 
0.063 080 FLOATIBG POIBT FORBAT SUEROUTIBES FOB SPS* 
0.077 081 FLOATIBG POINT. *FORTBAN II FOB AUTOHATIC 
0.015 010 #FLOATING-POINT SORTING SUBROUTINE FOE* 
0.212 067 FLOS I. tELECTRIC PONER 
0.117 055 FLOW III. (ELECTRIC POWER 
6.107 023 FLOW IN A PIPE NETWORK BY HARDY CROSS* 

3.006 112 FLOW IN PIPE NETWORKS. »HYDRADLIC ANALYSIS OF 
0.019 011 FLOW RATES IN GAS AND WATER NETWORKS. 
1.051 101 FLOW SINGLE LINE DIAGBAB OUTPUT. »ELECTBIC* 
16X 002 FLOW. (SCALAR ELECTRIC LOAD 
0.182 061 FOCUS SHIFT COHPUTATIOHS PROGRAM. (RADIAL* 

.0.063 019 •FOR-D-PRINTER. 

0.050 017 *FOR-TO-GO (2 PASS FORGO). 

0.012 127 tFOB-TO-GO-P PRINTER. 

.3.011 116 FORCES OF A VIBRATING BEAB. *NATUBAL+ 

3.015 116 #FORCOH II-D - SUBROUTINES FOR FORTRAN II-D. 

3.016 117 FOHCOB SUBROUTINE FOR FORTRAN WITH FOBBAT. 
0.011 126 #FOBCOB SUBROUTINES FOR FORTRAN II. 
0.065 037 *FORCON SUBROUTINES FOR FORTRAN W/FORBAT. 
1.031 015 FOREST INVENTORY STATISTICAL CHECK PROGRAB. 
0.036 121 •FORGO - LOAD AND GO FORTRAN. 
0.001 118 (FORGO P PRINTER. 
2.005 111 tFORGO-D. 

.2.010 112 FORB. (CORRELATION BATRIX WITH OUTPUT IN* 

.0.052 125 FORBAT (CARD). #1620/1113 FORTRAN WITH 

0.038 077 FORBAT - CARD. (FORTRAN WITH 

1.026 100 FORMAT - 1627 PLOTTER SUBROUTINE. (1620/1113+ 

.0.182 061 FORBAT CHECKER. (FORTRAN 

0.013 123 FORBAT CORRELATION PROGRAB. (VARIABLE 

0.011 017 FORBAT GAHBA FUNCTION SUBROUTINE-POSITIVE* 

.0.012 039 FORBAT PLOT BELOCATABLE SUBROUTINE. 

3.050 117 #?ORBAT STATEMENT COMFILEE SUBBOUTINE. 

.0.111 051 FOBBAT STATEBENT PBESEIECTOR. (FORTRAN II 
.2.008 111 FORBAT SUBROUTINE FOR PLOTTING WITH A* 

2.007 111 FORMAT SUBBOUTINES FOR SPS II-D. 
0.019 076 FORBAT T TEST BEAN AND STANDARD DEVIATION* 

.6.135 026 FORBAT. #KHIC INDEX BITH 

0.015 077 FORBAT. (PLOT SUBROUTINE FOR FORTRAN WITH 
.0.055 079 FOBBAT. (BODIFIED CDS FOHCOB SUBROUTINE FOE* 
.0.103 053 FORBAT. (POST PROCESSOR FOR LE BLOND* 
.0.115 059 FORBAT, FILE NO. 1620-PO-037. (EESSEL+ 
0.053 018 FORBAT, 1627 PLOTTER SUEBOUTINE, PROGRAB* 
0.091 052 FORBATION - 6131. (AERIAL TRIANGULATION STRIP 
.0.169 062 FORBO/FOBTRAN OF ROLLA MISSOURI. »6-61 

.1.029 101 FORMONITOR II. (DISK PACKER 

.1.001 081 FORMS OF AN EXAMINATION. *SCRAMBLE -* 

0.207 066 FOBMS. (CONVEBSION OF KELVIN FUNCTIONS TO* 
.1.003 081 FOBBULA II. (MOLECULAR 

221 069 FORMULA. (FITTING DISTRIBUTIONS WITH THE* 
.0.011 017 FOBBULA. (POLYNOMIAL CUBVE FITTING - NEWTONS* 
.0.207 066 FORMULAE. (GENERALIZED STACK - VIBRATION* 

.0.069 049 #FORTE. 
.0.011 017 FORTRAN (AN INTERPRETIVE PROGRAB). (PDQ 

0.023 014 FORTRAN (CARD). (EEBOB FUNCTION SUBROUTINE* 
.0.024 014 FORTRAN (FORMAT). (CAL-CCBE 565 PLOTTER* 

.0.025 045 (FORTRAN CALL SUBROUTINES FOE PLOTTING. 

.0.026 015 (FORTRAN COMPRESSOR AND MULTI-PBOGBAMBER. 

0.027 015 FORTRAN COMPRESSOR. (PDQ 

.0.028 015 FORTRAN DISK SYSTEM FOR 1620. (PDQ 
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1620-09 

1620-02 

1620-02 

1620-07 

1620-13 

1620-01 

1620-01 

1620-02 

1620-02 



FORTRAN 
NO. PAGE 
0.029 015 
3.052 118 
4.008 099 
0.115 059 
5.005 107 
0.030 032 

2.010 112 
0.019 121 
1.056 185 
2.001 082 
1.061 106 
2.052 093 
0.001 037 
0.055 125 
0.037 077 

1.011 103 
16X 002 
1.013 085 
0.056 018 
0.158 061 
0.006 039 
0.063 019 
0.050 017 
0.075 081 
3.016 098 
0.181 064 
0.142 058 
0.019 076 
02X 001 

,0.118 055 
.0.023 076 
.1.009 099 
.0.157 060 
.0.247 073 
.0.246 073 
.0.248 073 
.0.245 073 
.0.134 057 
.0.007 074 
.6.146 028 
.0.012 039 
.0.018 075 
.2.083 097 
.3.011 097 
.7.005 109 
.2.008 016 
.0.213 072 
.6.076 021 
.0.050 078 
.0.010 075 
.6.053 020 
.6.136 026 
-019 005 
.6.133 026 
.1.037 102 
.1.018 101 
.7.008 109 
.7.006 109 
.2.078 096 
.1.049 104 
.4.053 105 
-05X 004 
.0.062 037 
.0.009 031 
.0.063 037 
.5.006 107 
.6.105 023 
.6.096 022 
.6.071 021 
.6.051 020 
.0.013 047 
0.008 031 
0.064 037 
0.043 033 
0.104 053 
037 005 



040 006 

1.017 013 
0.205 066 
0.018 078 
0.010 126 
6.138 027 
6.086 022 
6.068 021 
6.136 026 
0.206 066 
3.033 111 
6.056 020 
6.096 022 
1.013 118 
0.037 077 

■039 006 

2.018 092 
0.016 031 
6.150 029 
0.011 126 
0.008 038 
1.012 085 
0.217 073 
0.823 076 
2.081 097 
0.060 036 
0.031 032 
0.063 080 

.0.005 126 
6.123 025 
6.015 019 
0.055 035 

.0.061 036 
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FOBTBSH II-D. 

FORTBAN II-D. 

•FORTRAN II-D, 



♦DEFT - DISK EXECUTION OF 
tFORCOM SUBROUTINES FOB 
t1620/1443 



FORTBAN 

TITLE 
FOBTEAN POE BONITOE I SYSTEB. IGOTAFIT -+ 
FOBTRAN FOE IICNITOB I, VERSION 2. MODIFIED 
FOBTBAN FOB BONITOR I, VBBSION 2, 60K. 
FORTRAN FOB THE 1622. tCOBFLEX 

FOBTBAN FOB 20K. tNCE IOAD AND GO 

FOBTBAN FOB 20K. tH.C.E. LOAD AND GO 

tFOBTBAN FOBBAT CHECKER. 

•FORTRAN FORMAT SUBROUTINE FOB PLOTTING BITH* 

tFOBTBAN II (CABD) . 

•FORTRAN II FOB AUTOBATIC FLOATING POINT. 

tFOBTBAN II FOBBAT STATEMENT PRESELECTOR. 

tFOBTBAN II SUBBOUTINE FOR PLOTTING KITH A* 
FOBTEAN II. tFORCOB SUBROUTINES FOR 

FOBTBAN II. tBANDOB NUBBER SUBBOUTINE FOB 
FORTRAN II. tBELOCATABIE COS, SIN AND EXP* 

•FORTBAN II-D DISK SUBBODTIHES TO BEAD OB* 

•FORTRAN II-D SUBBOUTINE FOB BATBIX INVERSION 
FORTBAN II-D. tGETBEC SUBBOUTINE 

FORTRAN II-D. tFORCOB II-D - SUBROUTINES FOR 
FORTRAN II-D. tFLOATING-POINT SORTING* 
tFBEAD - FBEE-STY1E CABD* 
tBELOCATABIE PLOT SUBBOUTINE 
1627 PLCTTEB SOBBOOTINES,* 

tFOBTBAN II, 1627 PLOTTER SUBROUTINES PROGBAB 

tFOBTBAN PBE-COBPILEB (CABD) . 
FOBTBAN PBOCESSING SISTEB. tAUTO FLCAT 

FORTRAN PROCESSOR AND SUBROUTINES. tUTO 
FORTRAN PROCESSOR. tSUPEB-GC 

tFOBTBAN PEOGEAB STBAIGHTENEB. 

tFOBTBAN SISTEB BELOCATABLE SUBBOUTINE FOR* 
FORTRAN SYSTEB. tA BODIFIED PDG 

FORTRAN SYSTEB. tSITEAN -r A IOAD AND GO 

tFOBTBAN TEACH. 
FOBTBAN TRANSFER 
FORTRAN H/FORBAT 
FORTRAN WITB FOBBAT (CABD) . 

tFOBTBAN WITH FOBBAT - CABD. 
FOBTEAN WITH FOBBAT - 1627 PLOTTEE* 

tFOBTBAN BITH FOBBAT GABBA FUNCTION* 
FOETBAN BITH FOBBAT. tPIOT SUBBOUTINE FOE 
FOBTBAN BITH FOBBAT. tflODIFIED CDS FOECOB* 
FOBTBAN BITH FOBBAT, FILE NO. 1620-FO-037. 

♦FORTRAN BITH FORHAT, 1627 PLOTTER* 

♦FORTRAN 90 COBPILER AND SUBROUTINES. 
FORTBAN. tBG-UTO 

FOBTEAN. #AFIT IBPBOVED 

FOBTBAN. tFOBGO - LOAD AND GO 

FOBTEAN. tPIOT SUBEOOTINE FOB 

FOETBAN. tBANN-BHITNEI U TEST HBITTEN IN 
FOBTEAN. tC4D - AN OPERATING SYSTEB FOB PDQ 
FOETBAN. tGAHBA FUNCTION SUBROUTINE FOR PDC 
FORWARD INTERPOLATION. tNENTONS 

FOUR-FACTOR FACTOBIAL. tANALYSIS OF VARIANCE 
FOUR-FACTOR FACTOBIAL. tANALYSIS OF VARIANCE 

♦FOUBIEB ANALYSIS - TBO OE THEEE PASS SYSTEB. 
FOURIER ANALYSIS; A. COEFFICIENTS PROGRAM;* 
FOUEIEE SYNTHESIS PBOGBAB FOR X-RAY* 
FOUBIER SYNTHESIS PROGRAM FOR X-RAY* 
FOURIER SYNTHESIS PROGBAB. tALPHABETIC* 
FEAHE ANALYSIS. tINDETEEBINATE 

FBABE ANALYSIS. tNON-PEISBATIC NCN* 

tFBABE SUEBODTINE. 

tFBEAD - FEEE-STYLE CABD BEADING FOB 1620* 
FBEE-STYLE CABD BEADING FOE 1620 BONITOE II* 
FEEQ01NCIES AND EELATIVI DEFLECTIONS AND* 

•FREQUENCIES SHOWN BENEATH CLASS BAXIBA. 
FREQUENCIES. tSCATTEE DIAGEAB OF DATA 

FEEQUENCIES. tANALYSIS OF VARIANCE AND* 
FREQUENCIES. tPEECENTILE SCOBES FREQUENCY* 
FREQUENCIES-UCBBL63. tANALYSIS OP VABIANCE -♦ 
FEEQOENCY CURVE PBOGBAB. tOGIVE 

♦FREQUENCY DISTRIBUTION GENERATOR PBOGBAB -♦ 

•FREQUENCY DISTBIBUTION PBOGBAB - SINGLE AND* 
FEEQOENCY DISTBIBUTION PBOGBAB. tTEST SCOBE 

♦FREQUENCY DISTRIBUTIONS - SINGLE AND DOUBLE* 
FREQUENCY DISTRIBUTIONS, AND CUBULATIVE* 
FREQUENCY RESPONSE ALGORITHH. tBODE - A 
FREQUENCY. #1 TO 4 BAY ANALYSIS OP VARIANCE* 
FRICTION HEAD LOSS CALCULATIONS IB WATER* 
FUNCTION (FOETBAN II) . tSOET-LIBEAEY 

FDNCTION FITTEE. tSlXTEEH-TWENTY UNIVEBSAL 
FUNCTION SUBBOUTINE FOB PDQ FORTRAN (CARD) . 
FUNCTION SUBROUTINE FOR PDQ FORTRAN. tGAMMA 
FUNCTION SUBBOUTINE SET. *COHBIHATIONAL+ 
FUNCTION SUBROUTINE. tA VARIABLE PBECISICN* 
FUNCTION SUBEOUTINE-POSITIVE ABGUBENTS. 
FUNCTION SUBROUTINES FOB PORTRAN BITH* 
FDNCTION TBANSFOBHATION. tEOOLEAN 

FUNCTION USING SIBPSONS EULE. tNUBEBICAL* 
FUNCTION. •DIFFERENTIATION OF AN EMPIRICAL 
FUNCTIONAL DEMONSTRATION OP THE IBB 1620. 
FUNCTIONAL SUBROUTINE TO GENERATE RANDOM* 
FUNCTIONS OF FIRST CRDEB. tKELVIN 

PUNCTIONS OF INTEGEAL OBDEB. ^COMPUTATION OP* 
FUNCTIONS TO THEIE POLAB FOEBS. tCONVEESION* 
PUNCTIONS. tCAICULATION OF POLES AND ZEROS* 
FUNCTIONS. tECONOBIC OBDEE QUANTITIES FOE* 
FUNCTIONS.. •TBREE-IN-ONB CURVE FITS* 



KBIC (KEYBORD-IN-CONTEXT) INDEX 



GAHE (MODIFIED) 
tGABE OF DICE. 
GABE PROGRAB. 
GAME SOLUTION. 
GAHE. 



tQUEENS 



♦BASEBALL 

♦APPROXIMATE EECTANGULAB 

♦BLACKJACK 

GABE. tBXECUTIVE 

GABE. tTHE EXECUTIVE 

GAHE. tPBODUCTICN BANPOBEE 

GAHE. tBOILESBAKER DAIEY BANAGEBENT 

GAME. tBOILEEBAKEE SUPERMARKET BANAGEBENT 
GAHE. tBOILEEBAKEE PAfifl SUPPLY BUSINESS* 
GAHES. tEXTEEBE-POINT SOLUTIONS FOB* 



PROGRAM 

1620-01. 

1620-01. 

1620-01. 

1620-06. 

1620-02. 

1620-02. 

1620-01. 

1620-01. 

1620-FO- 

1620-FO- 

1620-01. 

1620-01. 

1620-01. 

1620-07. 

1620-07. 

1620-01. 

1620-07. 

1620-01. 

1620-01. 

1620-01. 

1620-01. 

1620-01. 

1620-LH- 

1620-LB- 

1620-FO- 

1620-01. 

1620-02. 

1620-02. 

1620-01. 

1620-07. 

1620-02. 

1620-02. 

1620-13. 

1620-01. 

1620-01 

1620-FO 

1620- FO 

1620-Lfl 

1620-07. 

1620-01. 

1620-01 

1620-07. 

1620-Lfl 

1620-02. 

1620-02. 

1620-01. 

1620-02. 

1620-01. 

1620-06 

1620-02. 

1620-07. 

1620-06. 

1620-06. 

1620-06. 

1620-07. 

1620-06. 

1620-08 

1620-08 

1620-08 

1620-09. 

1620-09. 

1620-01. 

1620-01. 

1620-01. 

1620-09 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620- 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-09. 

1620-06. 

1620-09. 

1620-01. 

1620-CA- 

1620-07 

1620-07 

1620-09 

1620-07. 

1620-07 

1620-07. 

1620-05 

1620-07. 

1620-07. 

1620-11 

1620-07. 

1620-03. 

1620-03. 

1620-03. 

1620-09. 

1620-10. 

1620-0 

1620-1 

1620-1 

1620-1 

1620-0 

1620-1 

1620-1 

1620-1 

1620-1 

1620-1 

1620-1 

1620-1 

1620-0 



NO. 
2.015 
4.026 
1.028 
0.008 
0.029 
0.057 
1.017 
6.068 
019 
0119 
6.086 
6.065 
6.074 
0.064 
0.038 
6.151 
0.076 
6.112 
6.105 
6.133 
2.019 
2.017 
042 
041 
006 
6.076 
0.017 
0.045 
4.027 
0.015 
0.066 
0.047 
0.013 
1.034 
6.051 
037 
004 
04 
0.048 
6.056 
6.096 
0.037 
039 
0.014 
0.036 
1.010 
0.008 
6.055 
0.058 
0.059 
0.062 
0.100 
0.026 
0.027 
0.056 
0.056 
5 
4.006 
4.007 
2.033 
2.059 
6.154 
2.019 
2.019 
5.006 
0.227 
0.228 
0.132 
0.115 
0.110 
0.127 
0.095 
0.171 
0.232 
0.016 
0.115 
4.065 
0.202 
2.039 
6.069 
02X 
0.063 
0.062 
4.062 
0.077 
0.048 
0.037 
0.025 
0.043 
0.034 
0.029 
0.071 



PAGE 

016 

018 

018 

043 

032 

036 

013 

021 

004 

005 

022 

020 

021 

080 

077 

029 

081 

024 

023 

026 

016 

016 

007 

006 

004 

021 

031 

034 

018 

075 

037 

034 

127 

015 

020 

005 

004 

006 

078 

020 

022 

077 

006 

031 

033 

013 

031 

020 



053 
045 
045 
079 
048 
084 
084 
084 



029 

016 
016 

107 
070 
070 
057 
055 
054 
056 
052 
063 
071 
044 
055 
106 
065 



4.057 
1.011 
0.019 
0.021 
0.025 
0.037 
0.046 
0.005 
0.036 
0.004 
2.009 
0.048 
0.047 
0.049 
0.045 



081 
078 
077 
041 
077 
076 
120 
081 
038 
038 
038 
105 
110 
076 
119 
120 
122 
078 
118 
121 
118 
111 
124 
124 
124 
077 



TITLE 

•GABBA FUNCTION SUBEOOTINE FOB PDQ POBTBAB. 
GABBA FUNCTION SUBEOUTINE-POSITIVE* 
GANG-PUNCHING OR EBITTING. tCARD BEFBOCUCEB* 
GANG-PUNCHING PROGBAM. tGENEBAL 

GAS AND BATEB NETBOBKS. tPBESSOBE AND FLOB* 

tGAS NETWOBK ANALYSIS PBOGBAH FOR LOB, HEDIUB 
GAS NETWOBK ANALYSIS PBOGBAB. tLOB AND* 

tGAUSS JORDAN WITH PARTIAL PIVOTAL. 
GEAR SELECTION. tHELICAL 

GENERALIZED ANOV. tCOBPLETELY 

•GENERALIZED SAG AND TENSION CALCULATIONS. 

•GENERALIZED STACK - VIBRATION CALCOLATIONS* 
GENERATE RANDOB NOBBEES POE THE BONITOE I* 
GENERATING (RANDOB NUMBERS). tFOBTRAN SYSTEB* 
GENERATION AND INTERPOLATION BITH* 
GENERATION FOB GIVEN INCBEBENTAL COST. tPLANT 

•GENERATION PLANNING. 
GENERATION. tTWELVE - TONE BATRIX 

GENERATOR PEOGEAB - SINGLE AND DOOBLE* 
GENERATOR PROGBAB. tCEITICAL PATH/SCHEDULE* 
GENEBATOB SUBPEOGBAH. tBANDOB EXPONENTIAL* 
GENERATOR. tLABELR - A BEPOET 

tGEODESIC POINTS. 
GEODETIC POSITION COBPUTATION. ♦INVERSE 
GEODETIC PROBLEM FOR SHORT LINES. •REVERSE 
GEODETIC PROBLEM. •DIRECT 

GEODETIC PROBLEM. tHELHEETS DIBECT 

GEODIBETEB FIELD NOTE BEDUCTION. *1620 BODEL 

•GEOBETEIC COMPUTATION. 

•GEOBETEIC COARCTATION. 

•GEOBETHIC COHPOTATION. 
GEOBETBI COGO 1 - CABD. tCIVIL ENGINEEBING* 
GEOBETBY I - DISK. tCIVIL ENGINEEBING* 
GEBNAN-TO-ENGLISB TBANSLATION. tELEBEBTABY 
GERBAN-TO-ENGLISH TRANSLATION. tELEBENTAEY 

•GETAG SYSTEB. 

tGETBEC SUBBOUTINE FOBTEAN II-D. 
GIEDEB ANALYSIS AND DESIGN PEOGEAB POB THE* 
GIRDERS. tANALYSIS OF HELICOIDAL 

GLOSSARIES, AND DICTIONARIES. tALPHABETIC* 

tGOTAFIT - GOTRAN AND AFIT FORTRAN FOR* 

tGOTRAN (CARD) . 
GOTBAN AND AFIT FOETBAN FOE BONITOE I* 

tGRADE NORNALIZING AND PLOTTING. 
GRADING PROGRAB. tPOBTA - A 

GBAPH GENEBATOB PBOGBAB. tCEITICAL* 

tGBAPH 2 - A PRINTER PLOTTING SUBROUTINE* 

•GRAPHING. 

•GRAVITY LOAD ANALYSIS PROGEAH. 
GRAVITY, POLAR MOBENTS OF INEETIA AND ALLIED* 

•GEEGOEIAN CALENDAR - 1585 to 2599 A.D. . 
GROUP DISCBIBINSNT ANALYSIS. tSEVEBAL 

•GUESS. 

•H-104, TWO-DIBENSIONAL, TRANSIENT OE STEADY* 
HAflflEE. tBATER 

HANDBOOK. *LUNCB STUDY EXPLODER AND STODENT* 
HARDY CROSS SOLUTION. MATER FLOS IN A PIPE* 
BABTEES CEITICAL VALOES, FOB P LEVELS OP* 
HASH TOTAL. tCABD 

HEAD LOSS CALCULATIONS IN BATER SUPPLY* 
HEAT BALANCE. tTUBBIBE CYCLE 

HEAT CONDOCTION. ♦H-104, THO-DIHENSIONAL,* 

•HEATING-LOAD DETEBHINATION FOE BUILDINGS. 

•HELICAL GEAR SELECTION. 
HELICOIDAL GIRDERS. tANALYSIS OF 

•HELBEETS DIRECT GEODETIC PROBLEM. 
BEE. *HIH AND 

•HIB AND HEB. 
HINGED SPANS BY THE CONJUGATE BEAH BETHOD. 
HOFSTBA UNIVEESITY NONPARAHETBIC TESTS. 

•BOBOGENEITY OF VABIANCE TEST AND T TEST USU+ 

tHOMCGENEITI OF VABIANCE. 
HOMOGENEITY OF VARIANCE. tBARTLETTS TEST FOR 
HOMOGENEITY OF VARIANCE, NONLINEAR DATA* 
HOMOGENEOUS AND NON-BOBOGENEOUS SINULTANEOUS* 

•HORIZONTAL ALIGNMENT AND OFFSETS (HALO) . 

•HORIZONTAL ALIGNMENT DATA FROH COORDINATES* 

tBOBIZONTAL CURVE DATA. 
BOTELLINGS ITERJTIVE PROCEDURE. ♦PRINCIPAL* 

tHOTELLINGS T-SQUARE. 
HOB. fS-109 STBESS ANALYSIS OF A FLANGED* 
BUGES NC-211 MACHINE TOOL CONTBOL. tPOST* 

♦BUNT - BOFSTBA UNIVEESITY NONPARAHETBIC* 

•HYDRAULIC ANALYSIS OF FLOB IN PIPE NETWORKS. 
HIPEBBOLIC, EXPONENTIAL, POBEB FUNCTIONS.. 

tHYPEBGEOBETEIC STATISTICS - HYPBG. 
BYPBG. tHYPEBGEOBETEIC STATISTICS - 

IDENTIFICATION OF AOTOBATA. tBINIBIZATION* 



IBPOEBATION 
PROGRAM NO. PAGE 
1620-07.0.062 080 
1620-07.0.048 078 
1620-01.3.016 017 
1620-01.3.012 016 
1620-09.2.078 096 
1620-09.5.010 108 
1620-09.3. I!13 097 
1620-05.0.026 042 
1620-09.5.001 107 
1620-06.0.090 051 
1620-09.2.069 095 
1620-09.2. 084 097 
1620-07.0.071 081 
1620-07.0. 015 075 
1620-07.0.055 079 
1620-09.4.036 102 
1620-09.4.033 102 
1620-05.0.030 042 
1620-06.0.095 052 
1620-10.3.020 113 
1620-06.0.111 054 
1620-01.6.160 030 
1620-07.0.069 081 
1620-09.2.021 088 



003 082 

004 082 



108 
.004 10 
.011 10 



II. 
II. 

II. 
II. 



•BOIECULAE FOHBDLA 
•DISK PACKEE FOBBONITOE 
•FOBCOB SUBBOOTINES POE FOBTEAN 
•COMPOSITE BEAM SERIES - PROGRAMS I AND 
II. tFACTOB ANALYSIS-PBINCIPAL COBPONENTS I* 
II. tBANDOB BUHBEB SUBBOUTINE FOB 1620 
II. tRELOCATABLE COS, SIN AND EXP* 
II, 1627 PLOTTER SUBBOOTINES PBOGBAH* 
INCBEBENTAL COST. tPLANT GENERATION FOR GIVEN 
INCEEBENTS OF TIBE. tSTODENT SCBEDULING* 
INDEPENDENCE CHI-SQU8RE ANALYSIS, COUNT* 
INDEPENDENCE CBI-SQUARE ANALYSIS, COUNT* 

•INDETERMINATE FRAME ANALYSIS. 
INDEX CRYSTALS. #A PROGRAB TO 

•INDEX OP OEDEE OF ASSOCIATION. 
INDEX BITH FOBBAT. tKWIC 

INDEXES AND LISTEB FOE CONCOBDANCES,* 
INDEXEB FOE DISK AND PBINTEE. tDISKHIC - A* 
INDEXEB. tSPS LABEL BEFEBENCE 

INDIVIDUAL AND COBB. STATION SUBBABIES. 
INERTIA AND ALLIED DATA. tCALCULATION OF* 
INFOBBATION RETRIEVAL. tLPI 



1620-08.1 
1620-08.1 
1620-07.0.068 080 
1620-09.2.052 093 
1620-09.2.040 090 
1620-09.2.041 091 
1620-09.2.042 091 
1620-OG-01X 011 
1620-OG-05X 011 
1620-11.0.054 125 
1620-11.0.053 125 
1620-01.6.155 030 
1620-01.6.112 024 
1620-09.2.050 092 
1620-09.5.007 108 
1620-10.3.038 115 
1620-01.2.015 016 
1620-PR-011 007 
1620-01.2.015 016 
1620-01.6.139 027 
1620-06.0.253 074 
1620-10.3.020 113 
1620-09.0.001 086 
1620-03.0.011 038 
1620-09.2.072 095 
1620-09.5.013 109 
1620-11.0.044 123 
1620-06.0.249 073 
1620-11.0.056 125 
1620-09.5.004 107 
1620-09.2.029 089 
1620-10.3.050 117 
1620-09.7.008 109 
1620-06.0.124 056 
1620-01.6.031 019 
1620-09.2.039 090 
1620-09.5 
1620-09.5 
1620-09.5 
1620-09.5.001 107 
1620-09.5.007 108 
1620-07.0.068 080 
1620-11.0.019 119 
1620-11.0.019 119 
1620-09.2.063 094 
1620-06.0.203 066 
1620-06.0. 081 050 
1620-06.0.035 046 
1620-06.0.210 066 
1620-06.0.152 060 
1620-05.0.020 041 
1620-09.2.038 090 
1620-09.2.027 088 
1620-09.2.062 094 
1620-06.0.091 052 
1620-06.0.112 054 
1620-09.7.005 109 
1620-10.4.011 118 
1620-06.0.203 066 
1620-09.7.006 109 
1620-07.0.819 076 
1620-06.0.106 054 
1620-06.0.106 054 
1620-13.0.035 129 
1620-08.4.012 085 
1620-01.6.150 029 
1620-01.6.074 021 
1620-09.2.057 093 
1620-06.0.169 062 
1620-07.0.064 080 
1620-07.0.038 077 
1620-LB-041 006 
1620-09.4.036 102 
1620-10.3.017 113 
1620-06.0.079 050 
1620-06.0.082 050 
1620-09.2.033 089 
1620-08.3. 005 083 
1620-06.0.098 053 
1620-10.3.033 114 
1620-10.3.038 115 
1620-10.3.051 117 
1620-01.1.014 013 
1620-06.0.123 056 
1620-09.5.013 109 
1620-13.0.032 129 



XIX 
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INFORBATION 

TITLE PROGRAM NO. PAGE 

INFORMATION RETRIEVAL. #i»SIB - ALPBANUBEHIC* 1628-01.6.6614 028 



IBITIAL VALUE PEOBIEB INVOLVING ONE FIBST* 
INITIAL VALUE PROBLEM INVOLVING ONE FIRST* 
INPUT DIFFUSION SYSTEM FOB TBE IBB 1620. 
INPUT. ♦BISSING DATA BEAD AND STANDARD* 
♦INPUT-OUTPUT SUBROUTINES FOB USE IN SYBBOIIC 
♦INSPEC - INVESTIGATE BUBERICALIY STUDENTS* 



1620-04.0.081 039 
1620-04.0.002 039 
1620-08,2.003 083 
1620-06.0.243 072 
1620-01.6.028 019 
1620-02.0.065 037 



INSPECTION PRCGEAH. 



*DIP - DISK 1620-01.6.141 027 



1620-07.0.043 077 

1620-03.0.005 038 

1622-08.4.002 083 

1620-09.4.061 106 

1620-08.4.008 084 

1620-06.0.239 072 

1620-06.0.242 072 



INTEGRAL OF A BEAL FUNCTION USING SIMPSONS* 
INTEGRAL OBDEB, ^COMPUTATION OF EESSEI+ 
♦INTENSITY COBRICTION PBOGRAB FOB NOBHAL -+ 

INTENSITY PATTERNS-DRIVEN ANTENNA ARRAY. 

♦INTER AND INTRA-BOLECULAR ATOBIC DISTANCE* 

INTERCORREIATICN PROGRAB. #40X40 BEAN* 

INTERCORRE1ATION. IT-TEST PROGBAN FOB 19X19* 

INTERPOLATION - 1620. ♦LAGRANCE 1620-07.0.030 076 

♦INTERPOLATION OF ATOBIC SCATTERING FACTOR* 1620-08.4.003 084 

INTERPOLATION MTH DERIVATIVES BY NEBIONS* 1620-07.0.055 079 

INTERPOLATION. ♦NEWTONS FORWAED 1620-06.0.100 053 

INTERPRETER AND PERPETUAL CALENDAR. #DATE 1620-11.0.045 123 

IBTEBPEETER. tBUSIC 1620-11.0.039 122 

INTERPRETER. #DEPAUB BACBINE LANGUAGE 1620-01.6.109 023 

INTERPRETIVE PROGRAB FOR STATISTICS. tTIPS -♦ 1620-06.0.183 064 

INTEHPBETIVE PBOGRABBING SYSTEB. #TABTBAN 1620-02.0.051 035 

♦INTEBEEETIVE SYSTEB FOR PERFOBBING+ 1620-02.0.011 031 

INTEBRUPT. IPBOGBAN 1620-01.6.029 019 

INTRA-BOLECULAB ATOBIC DISTANCE CALCULATION* 1620-08.4.208 084 

♦INVENT. 

INVENTOBY BANAGEBENT SIBOLATOR - 1620+ 

INVENTORY STATISTICAL CBECK PROGRAB. 

♦INVERSE GEODETIC POSITION COBPUTATION., 

♦INVERSE LAPLACE TRANSFOEB. 

INVERSION AND SOLUTION OF LINEAR EQUATIONS. 

INVERSION AND SOLUTION OF SIBULTANEOUS+ 

INVERSION AND/OR RELATED OPERATIONS. 

INVERSION PACKAGE. ♦VARIABLE PRECISION* 

IBVERSIOB SUBROUTINE. ♦BATBIX 1620-05.0.013 040 

INVERSION BITB COBPLEX VALUES. ♦SIBULTANEOUS+ 1620-09.4.015 100 

INVESTIGATE BUBERICALLY STUDENTS PBOGBAB* 1620-02.0.065 037 

♦INVESTBENT COSI. 1620-10.3.021 114 

INVESTBEBT. ♦CAPITAL 1620-CS-01X 002 

INVESTBENTS. ♦CAPITAL 1620-10.3.037 115 

IOCS ROUTINES, CONTBOLS SEQUENTIAL ADDITIONS* 1620-01.6.134 026 

♦ITEB ANALYSIS AND SCOBING. 1620-06.0.135 057 

♦ITEB ANALYSIS FOB 1230 OPTICAL BARK SCORING* 1620-86.0.220 068 

ITEM ANALYSIS OF PORTA-PUBCB TEST CARDS. 1620-06.0.179 063 

♦ITEB ABALYSIS PROGRAB. 1620-06.0.185 064 

ITEB ABALYSIS PROGRAB. ♦FIVE CBOICE 1620-06.0.229 070 

ITERATIVE PROCEDURE. ♦PRINCIPAL AXES FACTOR* 1620-06.0.091 052 

♦JANET - DIGITAL ANALOG SIBULATION PBOGBAB. 1620-02.0.053 035 

♦JANET-II - DIGITAL ANALOG SIBULATION PBOGBAB. 1620-02.0.054 035 

JOEDAN BITB PARTIAL PIVOTAL. ♦GAUSS 1620-05.0.026 042 

♦KARBER BETBOD OF ANALYSIS NONPARABETBIC* 1620-06.0.212 067 

KATE. ♦SPEK/SPEEDY 1620-08.2.004 083 

♦KELVIN FUNCTIONS OF PIBST OEDEE. 1620-03.0.007 038 

KELVIN FUNCTIONS TO TBEIE POLAR POBBS. 1620-03.0.008 038 

♦KENDALL'S TAU AND SPEAEBAB'S RHO COREELATIOB 1620-06.0.172 063 

KEYWORD IB COBTEXT ANALYSIS OB A BULTIPLE+ 

KEYWORD IN CONTEXT. #KBIC 



1620-01.6.156 030 

1620-CS-04X 002 

1620-06.0.043 047 

1620-09.2.021 088 

1620-06.0.164 062 

1620-05.0.039 043 

1620-06.0.037 046 

1620-07.0.076 081 

1620-06.0.120 055 



1620-10.3.032 114 
1620-10.3.016 113 



KEYWORD IN CONTEXT. 



♦ KBIC - 1620-10.3.041 116 



KUTTA. ♦NUBERICAI SOLUTION OF A FIRST CBDEE+ 
♦KBIC - KEYWOED IB CONTEXT. 
♦KWIC - KEYWOED IN CONTEXT. 
♦KBIC INDEX BITB FORBAT. 

KBIC INDEXER FOR DISK AND PBINTBE. ♦DISKWIC* 

LAAR CONSTANTS AND VAPOE LIQUID EQUILIBRIUB* 

LABEL EEFEEENCE INDEXES. 
♦LABELS - A BEPCET GENERATOR. 

LAG WITH OR WITHOUT DEAD TIME. ILEAST+ 
♦LAGEANCE INTERPOLATION - 1620. 
*LABP ♦ LESS ARITBBETIC BORE PROGRAMMING 
♦LAPHA TRABS 

LAPLACE TBJNSFORM 



1620-04.0.004 039 

1620-10.3.016 113 

1620-10.3.041 116 

1620-10.3.033 114 

1620-10.3.051 117 

1620-09.3.015 098 

♦SPS 1620-01.1.014 013 

1620-01.6.160 030 

1620-07.0.075 081 

1620-07.0.030 076 

1620-01.1.001 013 



1620-06.0.236 071 
♦INVERSE 1620-06.0.164 062 
LATBE BITH BARK CENTURY NUMERICAL CONTOURING* 1620-10.4.013 118 
LATIN SQUARES USU 31. ♦ANALYSIS OF* 1620-06.0.086 051 

LATTICE - USU 52. ♦ANALYSIS OF VARIANCE -♦ 1620-06.0.105 054 
LATTICE DESIGN USU 51. ♦ANALYSIS OF VAEIANCE+ 1620-06.0.083 051 



1620-06.0.062 049 
1620-05.0.016 041 



LATTICE DESIGN. ♦ANALYSIS OF VARIANCE 

LAV. ♦CALCULATION OF EIGENVALUES AND* 

LAYOUT. 

LEARNING PEOGEAB. 

♦LEAST SQUARE DIFFEBENCES, NON LINEAR CURVE* 

♦LEAST SQUARES ADJUSTMENT OF PEECISE SURVEY* 

♦LEAST SQUABES COSINE FIT-IBM 704 COFIT+ 

♦LEAST SQUAEES FIT OF RESPONSE CURVES TO* 

♦LEAST SQUAEES FIT OF VAPOE PRESSURE DATA BY* 
LEAST SQUARES PBOGBAB. ♦TWO-IN-ONE 1620-06.0.154 060 

LEAST SQUAEES. (FOUR TYPE POLYNOMIAL CURVE* 1620-06.0.157 060 
LEAST-SQUARES CURVE FITTING FEOGEAB. 1620-06.0.134 057 

IENGENDEE POLYNOBIALS. ^POLYNOMIAL CUEVE* 1620-07.0.007 074 
LENGTH FOR FIXED TIBE TRAFFIC SIGNALS. ♦THE* 1620-09.2.083 097 
LENGTHS. ♦EQUIVALENT PIPE 1620-09.3.014 



♦SPIRAL CURVI 1620-09.2.075 096 
♦IIC TAC TOE - A 1620-11.0.013 119 
1620-06.0.181 064 
1620-09.2.046 091 
1620-06.0.142 058 
1620-07.0.075 081 
1620-09.3.016 098 



♦LESS ARITHBETIC MORE PEOGRAMBING. 
LETTERING ON IEM CARDS. ♦CARD PUNCH* 



1620-01.1.001 013 
1620-11.0.041 122 



LEVEL FACTORIAL EXPERIMENTS. ♦ANALYSIS OF 2 - 1620-06.0.044 047 



1620-06.0.124 056 
1620-09.4.032 102 



105 
114 



1620-09.4.1 
1620-10.3.032 
♦PRODUCTION 1620-LB-018 006 
1620-09.4.049 104 
1620-09.4.020 100 



LEVELS OF .10, .01, .005. #DUNCANS MULTIPLE* 
LIFE AND ACTUAL 24-HOUR LOAD CYCLE. 
LIFE AND 24-HOUR LOAD CYCLE. ♦OVEBLOAD* 
LINE ABSTRACT. ^ZIP - KEYWORD IS CONTEXT* 
LINE BALANCING. 

LINE DIAGRAM OUTPUT. ♦ELECTRIC LOAD FLOW* 
LINE DROP CALCULATION IN 2 PASSES. ♦RADIAL* 
LINE DROP CALCULATIONS. MtADIAI THERE PHASE 1620-09.4.018 100 
LINE PLOTTING SDBBOUTINE. ISTEAIGHT 1620-01.6.140 027 

♦LIBEAF CCEBELATICN COEFFICIENT. 1620-06.0.038 046 

LINEAE CORRELATION. ♦BINARIATI 1620-06.0.188 065 

LINEAE CUEVE FIT. M.EAST SQUARE DIFPEEENCES, * 1620-06.0.181 064 
LINEAH DEMAND FUNCTIONS. ♦ECONOMIC ORDER* 1620-10.1.011 110 
LINEAR EQUATIONS IN 8 REAL VARIABLES. 1620-05.0.024 041 

LINEAE EQUATIONS. ♦SOLUTION OF SIMULTANEOUS 1620-05.0.007 040 



TITLE PROGRAM 

LINEAR EQUATIONS. #CALCULATION OF THE REAL* 1620-07. 
LINEAR EQUATIONS. ♦HATRIX INVERSION AND* 1620-85. 
LINEAR EQUATIONS. IBATRIX IBVERSIOB ABD* 1628-86. 
LINEAR EQUATIONS. ♦SOLUTIOB OF BOBOGENEOUS* 1620-05. 
LINEAR EQUATIONS. ♦SUBROUTINE CROUT FOR* 1620-05. 
LINEAR IN K VARIABLES LINEAR EQUATIONS. 1620-07. 
LIBEAB PBOGBAB BATBIX PREPARATION. ♦BXV* 1628-10. 
♦LINEAR PEOGRABBIBG I. 1620-10 

LINEAH PROGEABBING SYSTEB. ♦1620/1311 1628-CO 

♦LINEAE PROGRABBING. 1628-18 

♦LINEAH PROGRAMMING. 1620-10. 

LINEAR PEOGBAMBING. ♦OUTPUT ABALYSIS FOR 1620-10. 

LINEAR REGRESSION ANALYSIS PROGRAB. ♦SINGLE* 1620-06. 

LINEAR REGRESSION PROGRAM OF B. L. BILDER* 1620-06 

LINEAR EEGEESSION SYSTEM. ♦80-SEEIES MULTIPLE 1620-06. 

LINEAR REGRESSION. #STEPWISB BULTIPLB 1620-06. 

LINEAR REGRESSION. ♦EATCH PROCESSING* 1620-06. 

LINEARITY IB DATA. ^TRANSFORMATIONS TO CHECK* 1620-06 

LINES. ♦REVERSE GEODETIC PROBLEM FOE SHORT 1620-08. 

LINES. ♦VOLTAGE PROFILE ABD FAULT CUEEENT* 1620-09. 

LIQUID EQUILIBRIUB PROS AZEOTROPE DATA. 1620-89. 

LIST PROCESSING LANGUAGE. ♦SBOBOL 3 A 1620-01. 

LISTEB FOR COBCOEDANCES, GLOSSARIES, AND* 1620-10. 

LISTEB BITH GANG-PUNCHING OR SHITTING. ♦CARD* 1620-01. 

LISTER. ♦SUPER 1620-01 

LISTING. #AFIT SYMBOLIC PBOGRABBING SYSTEB,* 1620-01. 

LIVE LOAD DEFLECTIONS. ♦CONTINUOUS BEAM 1620-09 

LOAD ANALYSIS PBOGRAB. #GRAVITY 1620-09. 

LOAD ABD GO FORTRAB FOB 20K. ♦NCE 1620-02. 

LOAD ABD GO FORTRAN FOR 20K. ♦N.C.E. 1620-02 

LOAD AND GO FORTRAN SYSTEB. ♦BITEAN - A 1620-02. 

LOAD AND GO FORTRAN. ♦FORGO - 1620-02. 

LOAD AND GO SYBBOLIC PROGRAMBIHG SYSTEB. 1620-01. 

LOAD CYCLE. ^OVERLOAD RATINGS OF 65 DEGREES* 1620-89. 

LOAD CYCLE. ♦TRANSFORMER RATINGS BASED ON* 1620-09. 

LOAD CYCLES. ♦TBANSFORMER RATING FOR NORMAL* 1620-09. 

LOAD DEFLECTIONS. ♦CONTINUOUS BEAB LIVE 1620-09 

LOAD FLOW SINGLE LINE DIAGRAB OUTPUT. 1620-09. 

LOAD FLOW. ♦SCALAR ELECTRIC 1620-09 

LOAD 20K. ♦CLEAR AND 1620-01. 

LOAD. ♦COBPBESSION SPRING DESIGN, DYNAMIC 1620-09. 

LOC I. ♦COMPUTATION OF ROOT 1620-09 

LOCATION SYSTEB. IDTM 1620-09 

LOCATOR FOE CRITICAL PATH SYSTEM BETBOBK. 1620-10 
♦LOCUL - A BOOT LOCUS ALGOEITHM. 1620-09 

LOCUS ALGOBITHB. ♦LOCUL - A EOOT 1620-09 

LOCUS PLOTTING. ♦BOOT 1620-09 

♦LOGGING PEOGEAB. 1628-01 

LOGIC STATEMENTS. ♦TEDTH TABLES FOR SYMBOLIC 1620-01 

LOGIC TO LETERBINE THE VALIDITY OF A* 1620-13 

♦LOGIC. 1620-01 

LOOK-UP PROGRAM. ♦TABLE 1620-06 



103 
319 



1620-01 
1620-09 
1620-10 
1620-09 
1620-89 
1620-09 



LOOKUP, NO BRANCH AND TRANSMIT - (TLUNBT) . 
LOOP CURRENTS IN ELECTRIC CIRCUITS. 

♦LOOP LOCATOR FOR CRITICAL PATH SYSTEM* 
LOSS CALCULATIONS IN BATER SUPPLY* 
LOSS OF LIFE ABD ACTUAL 24-HOUR LOAD CYCLE. 
LOSS OF LIFE AND 24-HODB LOAD CYCLE. 
LOSSES AND PENALTY FACTOES. ♦TRANSMISSION 1620-09 
LOSSES. ♦EVALUATION OF POWER TRANSFORMER 1620-09 

♦LOB-PASS FILTER DESIGB. 1620-09 

♦LPI INFORMATION RETRIEVAL. 1620-13 

♦LUNCH STUDY EXPLODER AND STUDENT SCHEDULING* 1620-10 
MACHINE LANGUAGE INTERPRETER. #DEPAUW 1620-01 

MACHINE TOOL CONTROL. ♦POST PEOCESSOR+ 1620-10 
MACHINES. #TEANSIENT STABILITY FOR TEN 1620-09 

♦MACEO PROCESSOR FOE 1620-1443 MONITOR I* 1620-02 
BACRO SUBROUTINE. ♦ADDITIONAL INSTRUCTION 1620-01 
BACRO SUBROUTINES. #TNS, TNF AND MF 1620-01 

♦BACROINSTRUCTION FLOATING POINT FORMAT* 1620-01 
MACROSCOPIC INPUT DIFPUSION SYSTEM FOB THE* 1620-08 

♦MADAB - MATRIX DIAGONALIZATION, AUTO* 

♦MAGIC II - MATRIX ALGEBRA. 

♦MAIDS - A MACROSCOPIC INPUT DIFFUSION SYSTEB 

♦BAIDS-II. 
MANAGEMENT DECISION EXERCISE. ♦FARM* 
MANAGEMENT GAME. #BOILEBBAKEE DAISY 1620-11 

MANAGEMENT GABE. ♦BOILERMAKER SUPERMARKET 1620-11 
BANAGEBENT GABE. ♦EOILEEMAKEE FARM SUPPLY* 1620-11 
MANAGEMENT SIBULATOE - 1620 VERSION FOR* 1620-CS 
MANIPULATION. ♦DATMAN - DATA 1620-01 

♦MANB-BHITNEY TEST. 1620-06 

♦MANN-BHITNEY U TEST WRITTEN IN FORTRAN. 1620-06 
MANPOWER GABE. ♦PEODUCTION 1620-10 

BARK CENTURY NUBERICAL CONTOURING WITH "E"* 1620-10 
BARK SCORING READER OUTPUT. ♦ITEB ANALYSIS* 1620-06 

♦MARKOV CHAIN PROCESS. 

♦BASS DIAGBAB BODEL WITH CROSS SECTION. 
HASTES SCHEDULE. ♦WEEKLY SCHEDULING USING 1620-10 
MASTER SCHEDULE. ♦SEEK - WEEKLY SCHEDULE 1620-10 
MATIC 11 TUBE - TYPE. ♦AUTOSPOT POST -+ 
MATEIC METHOD. ♦SHCET CIBCUIT ANALYSIS BY 1620-09 
MATRICES. ♦CORRELATION PEOGBAM FOE SYMMETEIC+ 1620-06 
MATRICES. ♦MISSING DATA COEEEIATICN PROGRAM* 1620-06 
MATRIX ALGEERA. ♦MAGIC II - 1620-05 

MATRIX AND DISTANCE EETBEEN POPULATIONS. 1620-06 
MATRIX DIAGONALIZATION, AUTO BINIBIZATION OF* 1620-05 
BATBIX FORM. ♦CORRELATION MATRIX WITH OUTPUT* 1620-06 
MATRIX GENERATION. ♦TWELVE - TONE 1620-05 



1620-05 
1620-05 
1620-08 
1620-08 
1620-10 



1620-05 
1620-09 



♦BATBIX INVERSION AND SOLUTION OF LINEAE* 1620-05 

♦MATRIX INVERSION AND SOLUTION OF* 1620-06 

MATEIX INVERSION AND/OE RELATED OPERATIONS. 1620-07 

BATRIX INVERSION PACKAGE. ♦VARIABLE* 1620-06 

♦MATRIX INVERSION SUBROUTINE. 1620-05 

MATEIX INVERSION WITH COBPLEX VALUES. 1620-09 

BATRIX PEEPAEATION. ♦MXV PROGRAM FOR LINEAR* 1620-10 

MATRIX PROGRAB. ♦CORRELATION 1620-06 

MATRIX EOTATION. ♦VAEIMAX 1620-06 

BATEIX WITH MISSING DATA POINTS. ♦SIMPLE* 1620-86 

MATRIX BITH OPTIONAL FACTOR ANALYSIS AND* 1620-06 



BATRIX 

NO. PAGE 

0.041 877 

0.039 843 

8.037 046 
0.020 041 
0.035 042 
0.041 077 
1.004 110 

1.007 110 
04X 002 

1.008 110 
1.013 111 
1.812 111 
0.148 060 
0.011 043 
8.143 859 
0.806 043 
0.251 074 
0.250 074 
1.003 082 
4.056 105 
3.015 098 
4.024 018 

3.038 115 
3.816 017 
6.147 028 
1.827 814 
2.067 094 
2.072 095 
0.029 032 
0.057 036 
0.047 034 

031 
1.032 015 
4.060 105 
4.032 102 
028 101 
2.067 094 
4.049 104 
053 105 
6.090 022 
5.002 107 
,4.038 102 
.2.026 088 
.3.047 117 
.4.064 106 
.4.064 106 
.4.846 
.6.843 
.6.152 029 
.0.008 126 
.1.035 015 
.0.237 071 
.6.153 029 
.4.039 182 
.3.047 117 
.2.039 098 
.4.032 102 
.4.060 105 
.4.008 099 
.4.051 104 
.4.041 183 
.0.032 129 
.3.050 117 
.6.109 023 
.4.011 118 
.4.013 099 
.0.050 034 
.1.002 013 
.6.157 030 
.6.136 026 
.2.003 083 
.0.015 040 
.0.031 042 
.2.803 083 
.2.010 083 
.2.010 112 
.0.048 124 
.0.047 124 
.0.049 124 
-04X 002 
.6.149 029 
.8.819 044 
.0.058 048 
.2.009 111 
013 118 
.0.220 068 
.0.038 042 
.2.043 091 
.3.043 

3.8 
.3.015 
.4.023 
.0.114 
.0.121 
0.031 042 
0.208 066 
.0.015 040 
.0.104 053 
.0.838 842 
.0.839 043 
.0.037 046 
.0.876 881 
.8.120 055 
.0.013 040 
.4.015 100 
.1.004 110 
.0.162 061 
.0.894 852 
.0.097 852 
.0.145 859 



116 

115 
113 

180 
855 
856 



XX 



K»IC (KBYBOB D-IB-COBTBXT) INDEX 



MATRIX 

TITLE PROGRAM NO. PAGE 

MATRIX WITH OUTPUT IH BATRIX FORM. 1620-06. 8. 104 053 

MATRIX. (PBOGBAH TO COEVERT A COMPLEX 1620-05.0.032 042 

BATRIX. (SIMPLE CORRELATION COEFFICIENT 1620-06.0.052 018 
BATRIX. (CALCULATION OF THE CHARACTERISTIC* 1620-07.0.0112 077 
(BATBIX-BATBIX BUITIPLICATION SUBROUTINE. 1620-05.0.010 040 
BAXIBA. (FREQUENCIES SHOWN BENEATH CLASS 1620-06.0.227 070 
(BAXIMUM COBBEIATIOH HUH HISSING* 1620-06.0.175 063 

BAXIBUB OBE PASS SIMULTANEOUS EQUATIONS* 1620-05.0. 040 043 
BAZE DEMONSTRATION. tBOUSE IB THE 1620-11.0.051 124 

BEAB AND STANDARD DEVIATION PROGBAB. 1620-06.0.206 066 

BEAN AND STANDARD DEVIATION SOET PBOGRAB* 1620-06.0.243 072 
BEAB AND STANDARD DEVIATIOB. (KABBEE HETHOD+ 1620-06.0.212 067 
#HEAN AND STANDARD DEVIATION, SDH 3F SQUARES, 1620-06.0.177 063 
BEAB AND VABIABCE OF CHI SQDABF, WHEN* 1620-06.0.182 064 
BEAN BIFFEEEBCES. (MULTIPLE BANGE TEST OF 1620-06.0.036 046 
BEAN STANDARD DEVIATION AKD IBTEBCORRELATION* 1620-06.0. 239 072 
#BEAN STANDARD DEVIATION AND VARIANCE. 1620-06.0.051 047 

MEAN, SD AND IKTERCORRE1ATION. #T-TEST+ 1620-06.0.242 072 
#HEA»,. STANDARD DEVIATION, AND VARIANCE BY* 1620-06.0.136 058 
BEASORES AND UNEQDAI SUBSET CEIL FREQUENCY. 1620-06.0.202 065 
BEDIUB AND HIGH PRESSURE SYSTEB. #GAS* 1620-09.5.018 108 
BEDIOH PRESSURE GAS NETWORK ABALYSIS* 1620-09.3.013 097 

#BEETING ASSUBPTICNS OF HOMOGENEITY OF* 1620-06.0.152 060 
BEBOEY PRINT - SABP. #SEARCB ABC 1620-01.6.100 023 

BETHCD.. tFACTOR ANALYSIS EI THE CEBTROIB 1620-06.0.053 048 
HILBE'S BETBOD DSIBG RUNGE KUTTA. (NUBERICAL+ 1620-04.0.004 039 
BILSAUKEE - BATIC 11 TUBE - TYPE. IAUTOSPOT+ 1620-10.3.015 113 
♦BIN 3. 1620-05.0.041 043 

BIBERAL UNIT CELL CONTBNTS. #CALCOIATICN OF 1620-08.3.004 083 
•BINIBIZATIOB AND STATE IDEBTIFICATION OF* 1620-13.0.035 129 
BINIHIZATICN OF IRROE. #BADAB - BATRIX* 1620-05.0.015 040 
BISSIHG DATA ABD 40X40 BEAN, SB AND* 1620-06.0.242 072 

•MISSING DATA CORRELATION PROGRAN FOR* 1620-06.0.121 056 

♦BISSING DATA BEAN AND STANDARD DEVIATION* 1620-06.0.243 072 
BISSING DATA POINTS. (SIBPLE CORRELATION* 1620-06.0.097 052 
BISSING DATA. #19X19 1620-06.0.240 072 

BISSING OBSERVATIONS. *BAXIBUB CORREIATICB+ 1620-06.0. 175 063 
MISSISSIPPI TEST SCOEING PEOGEAB - UBTS. 1620-13.0.028 128 
BISSISSIPPI TEST SCOEING PEOGBAB. 1620-13.0.031 129 

BISSOUEI. #6-64 FORBO/FCBTRAN CF ROILS 1620-02.0.046 034 
BBEHCNICS DDHE. #ABL 1620-01.6.022 019 

BODEL-EQUAL CELL SIZE-NON-SOET-ABOV. #TEN 1620-06.0.213 067 
•HODIFIED CDS FORCOB SDEEOUTINE FOB FORTRAN* 1620-01.6.096 022 
HODIFIED FOR 80-80 LISTING. #AFIT SIHBOLIC+ 1620-01.1.027 014 
♦HODIFIED FORTRAN FOE BONITOR I, VERSION 2. 1620-01.4.026 018 
•BODIFIED FORTRAN FOE fiONITOB I, VEESIOB 2,* 1620-01.4.228 018 
#BODIFIED PDG FOETEAB SYSTEB. (A 1620-02.0.066 037 

•BODULAB INVEBTCBY BANAGFBEBT SIBULBTOE -+ 1620-CS-04X 002 
•BOIECULAB FOEBULA II. 1620-08.4.012 085 

•BOLECULAE PEAK FIBDEB. 1620-08.4.013 085 

BOBENT COEBELATIONS. #PBCDUCT 1620-06.0.022 044 

BOBENTS OF INERTIA AND ALLIED DATA. 1620-09.5.013 109 

#BONABUS - A BUSINESS SIHULATIOB+ 1620-11.0.052 125 

•BOBITOE DIB ABD EQUIVALENCE TABLE TEST. 1620-01.6.108 023 
(BONITOE EQUIVALENCE TABLE CAED OUTPUT. 1620-01.3.013 017 

•BOBITOE I DISK DUHE PATCH. 1620-01.6.143 027 

BONITOR I SPS II-D PSEDDO PROCESS PHASE. 1620-01.1.033 015 
BONITOR I SYSTEB. (GOTAFIT - GOTEAN AND AFIT* 1620-01.2.015 016 
BONITOE I SYSTEB. #EANDF - A FUNCTIONAL* 1620-07.0.071 081 
BONITOR I VERSION 2. (BACBO PROCESSOR FOR* 1620-02.0.050 034 
BOBITOR I, VERSION 2. JBODIFIED FORTRAN FOR 1620-01.4.026 018 
BONITCR I, VERSION 2, 60K. #HODIFIED FORTRAN* 1620-01.4.028 018 
BONITOR II (CARD). #1620/1311 1620-PR-029 008 

BOBITOR II (CARD). #1620/1443 1620-PR-045 009 

#B0NIT0R II (FORTRAB II-D) 1627 PLOTTER* 1620-LB-050 007 
BONITOR II (TAPE). #1620/1311 1620-PR-030 008 

BONITOR II FOBTEAN II-D. #FBEAD - FREE-STYLE* 1620-01.2.019 016 
BONITOR SYSTEB (IBS). (EXTENDED 1620-01.6.135 026 

•BONITCB 1 (CABB) . 1620-PB-025 007 

BOBITOE 1 (CARD). #1620/1443 1620-PE-033 009 

•HORTGAGE AHOBTIZATION PEOGBAB. 1620-11.0.018 119 

#BOSES - BAXIBUB OBE PASS SIBULTANEOUS* 1620-05.0.040 043 
•BOUSE IN THE BAZE DEMONSTRATION. 1620-11.0.051 124 

#HULTI ANCHOR PIPE STEESS ANALYSIS. 1620-09.4.030 101 

#HULTI-ANCHCB PIPE STRESS ANALYSIS. 1620-09.4.040 102 

HULTI-PBOGEAHBEB. #FOBTRAN COBERESSOE ARC 1620-01.6.045 019 
HULTICOBPONENT DISTILLATION. JTHIELE-GEDDES* 1620-09.3.012 097 
MULTIPLICATION REGDLATOE FOB DATA WITHOUT* 1620-03.0.012 039 
HULTIPLICATION SUBBOUTIBE. #HATRIX-BATRIX 1620-05.0.010 040 
•MULTIPOINT FLCTTEB. 1620-01.6.148 028 

•MULTIPURPOSE SPS CARD OUTPUT COMFBESSOR. 1620-01.1.006 013 
•MULTIVARIATE ANALYSIS OF VABIABCE COBPLETELY 1620-06.0.138 058 
(BULTIVABIATE ANALYSIS OF VARIANCE BANDCBIZEC 1620-06.0.139 058 
•BULTIVABIATE DATA COLLECTION. 1620-06.0.167 062 

•MUSIC INTERPRETER. 1620-11.0.039 122 

MUSIC PROGRAM TO ERD ALL BUSIC PROGBABS. 1620-11.0.046 123 
•BUSIC PBOGRAB. 1620-11.0.031 121 

MUSIC PROGRAMS. #VIRTUOSO - THE BUSIC* 1620-11.0.046 123 
•MUSICAL ASSEMELY PBOGRAB. 1620-11.0.034 121 

•MUSICAL OUTPUT PEOGBAB. 1620-11.0.033 121 

BUTIPIE LIBEAB REGRESSIOB ABALYSIS PROGEAB. 1620-06.0.148 060 
#MXV PROGRAM FOE LIBEAR PEOGBAB MATRIX* 1620-10.1.004 110 
•B.C.E. BIGB SPEED SPS ASSEMBLES. 1620-01.1.029 014 

•N.C.E. LOAE AND GO FOBTRAB FOB 20K. 1620-02.0.057 036 

•NATURAL FREQUENCIES AND RELATIVE DEFLECTIONS 1620-09.5.006 107 
BC-211 MACHINE TOOL CONTBOL. #POST FROCESSCB+ 1620-10.4.011 118 
•NCE LOAD AND GO FOETRAB FOB 20K. 1620-02.0.029 032 

NEGATIVE BINOBIAL DISTRIBUTION. *ESTIBATICB* 1620-06.0.117 055 
NEGATIVE BINOBIAL DISTRIBUTION. •POKER* 1620-06.0.116 055 
NEGATIVE BINOBIAL DISTBIBUTIOBS. (FITTING 1620-06.0.248 073 
•NELIAC COMPILES. 1620-01.1.030 014 

•NESTED ANALYSIS OF VARIANCE FOE UNEQUAL* 1620-06.0.065 049 
NETWORK ANALYSIS PEOGBAM FOE LOB, MEDIUB AND* 1620-09.5.010 108 
NETWORK ANALYSIS PBOGRAB. «LOW ABC MEDIUM* 1620-09.3.013 097 
NETWORK BY HABCY CROSS SOLUTION. #BATER FLOS* 1620-09.7.008 109 
•NETBOBK REDUCTION PLUS DISTRIBUTION FACTCE* 1620-09.4.029 101 
#8ETBCBK BEDUCTICN PEOGEAB. 1620-09.4.016 100 

NETBOBK EECUCTIOB. #ELECTRICAL 1620-09.4.058 105 

NETBOBK. #IOCP LOCATOR FOR CRITICAL PATB+ 1620-10.3.047 117 
NETBOEKS. #CAUIB EXPANSIONS OF PASSIVE* 1620-09.4.026 100 



PASSES 
TITLE PROGRAM NO. PAGE 

NETBOEKS. #BYDBAULIC ANALYSIS OF FLOB IB PIPE 1620-09.7.006 109 



BETBORKS. tPBESSUEE ABD FLOB BATES IN GAS* 

BEWTONS DIVIDED DIFFEREBTIAL FORMULA. 

BEBTOBS F.I.B.. #POLINOMIAL GEBERATIOB AND* 
•NEKTONS FORBABD INTERPOLATION. 

NEYMAN A FORMULA. #FITTING DISTRIBUTIONS* 
• NIB. 

BODE AND DUBBY ASSIGBBENT TECHNIQUE PROGRAfl. 

NON LIBEAB CURVE FIT. #LEAST SQDABE* 

BON SYBETBICAL RIGID FBABE ABALYSIS. 

BON- LINEAB IN K VARIABLES LIBRAE EQUATIOBS. 

NON-HOBOGENEOUS SIBULTANEOUS LINEAB* 

BON-LIREAE EQUATION IN OBE VAEIABLE. 
•NON-LINEAR LEAST-SQUARES CURVE FITTING* 
•NON-LINEAR PATCH FOR BULTIPLE LIBEAR* 
•BON-PBISMATIC NON SYBETBICAL BIGID FRABE+ 

BOBLINEAE DATA TEABSFOEM ATIONS. »MEETIBG* 



BOBPAEABETRIC ESTIMATES OF BEAN ABD STANDAED+ 1620- 



1620-09.2.078 096 
1620-07.0.023 076 
1620-07.0.055 079 
1620-06.0.100 053 
1620-06.0.247 073 
1620-11.0.042 123 
1620-10.3.030 114 
1620-06.0.181 064 
1620-09.2.059 094 
1620-07.0.041 077 
1620-05.0.020 041 
1620-07.0.033 076 
1620-06.0.134 057 
1620-06.0.011 043 
1620-09.2.059 094 
1620-06.0.152 060 



.0.212 067 



1620-06.0.203 066 

1620-06.0.218 068 

1620-11.0.055 125 

1620-08.4.002 083 

1620-09.4.031 101 

1620-09.4.028 101 



NONPABABETEIC TESTS. #HUNT - HOFSTEA+ 

#NONPAEABETRIC TBO-HAY ANALYSIS OF VABIABCE* 

•NOPE/NIB ONE FILE IDUCATOE. 
NORBAL - BEAB OB EQUI-INCLINATION SETTING. 

#NORBAL AND EBEBGENCY CABLE RATINGS. 
BOEMAL AND EBERGENCY OPEEATIOB HITH COHPLEX+ 

NOEBAL AND EBERGENCY OPEEATION. #TRANSFORBER+ 1620-09.4.012 099 
NORMAL STUDENT T/CBI-SQUAEE F PROBABILITIES. 1620-06.0.128 056 
NORBALITY BITB PEOVISIOB FOR STANDARDIZATION* 1620-06.0.194 065 

•NOBBALITY. 1620-06.0.034 046 

BORBALIZIBG AND PLOTTIBG. #GRADE 1620-01.6.139 027 

#NOBTHEASTERN UNIVERSITY TEST SCORING PROGRAfl. 1620-13.0.003 126 
BOTE REDUCTION. #1620 BODEL 4 GEODIMETER 1620-09. 2. 052 093 
NUMBER DEBOBSTBATICB FROGRAfl. (PERFBCT 1620-11.0.030 120 

NOHBER DEMONSTEATOB. #PEIME 1620-11.0.050 124 

NUMBER GENERATOR SUBPROGRAM. #RAHDOB* 
NUMBER SUBBOUTIBE FOB 1620 FOBTEAN II. 
NUBBEE TBEOEY DEBOBSTBATION. #ELEBEBTAEY 1620-11.0.038 122 
NUMBERS FOR THE BOBITOE I SYSTEB. «BANDF - A* 1620-07.0.071 081 
NUMBERS. (DEMONSTRATION PROGRAM TO PRINT OUT* 1620-11.0.040 122 
NUMBERS. (INTERPRETIVE SYSTEB FOR PERFORBING* 16 20-02.0.011 031 



1620-06.0.111 
1620-07.0.064 080 



NUBBEBS. (NESTED ABALYSIS OF VARIANCE FOE* 



1620-06.0.065 049 



NDMEBIC DATA DECKS OB 1443 PRINTER. #TABDLATE 16 20-13.0.034 129 



tNUflEBICAL CALCULATIONS OF THE DEFINITE* 

NUBERTCAL CONTOURING WITH "E" FORHAT. #POST 

NUHERICAL CONTFOL PEOCESSOB. #1620/1311 

NUBEBICAL CONTBOL PEOCESSOB. #1620/1311+ 
(NUBEBICAL SOLUTION OF A FIBST OEDEB* 

NUBERICALLY STUDENTS PBOGRAB EXECUTE AND* 

OBJECT DECK ABALYZEE. 

OBJECTIVE EOESCHACH TEST/SOET. #SCOEIBG,* 

OBSEEVATIONS PEE CELL. (NOBPAEAHETBIC* 

OBSERVATIONS. (LEAST SQUARES ADJUSTHENT OF* 

OBSEEVATIONS. (HAXIBUM CORRELATION BITH* 

OFFSETS (HALO). »HORIZONTAL ALIGNMENT AND 1620-09.2.038 090 

OFFSETS. (RELOCATION 1620-09.2.012 086 

•OGIVE FREQUENCY CURVE PBOGRAB. 1620-06.0.127 056 

OBE-DIBENSIONAL FEW-GROUP DIFFUSION CODE FOE* 1620-08.2.001 082 



1620-07.0.043 077 
1620-10.4.013 118 
1620-CN-06X 001 
1620-CB-07X 001 
1620-04.0.004 039 
1620-02.0.065 037 
•SPS 1620-01.6.060 020 
1620-06.0.165 062 
1620-06.0.218 068 
1620-09.2.046 091 
1620-06.0.175 063 



1620-09.4.026 100 

1620-06.0.233 071 

1620-09.2.032 089 

AN 1620-02.0.059 036 

1620-02.0.011 031 

1620-07.0.076 081 

1620-06.0.220 068 

1620-10.3.052 118 

1620-06.0.234 071 

1620-06.0.244 073 

1620-06.0.145 059 

1620-EO-01X 003 

1620-04.0.004 039 

1620-04.0.001 039 

1620-04.0.002 039 

1620-07.0.075 081 



ONE-PORT NETWORKS. (CAUEE EXPABSIONS OF* 
•ONE/TSO/THEEE BAY ABALYSIS OF VABIABCE. 
OPERATING COST SYSTEM. #VEHICLE SIMULATION 
OPERATING SYSTEM FOR PDQ FORTRAN. #C4D - 
OPERATIONS WITH COMPLEX NUMBERS. 
OPERATIONS. #FORTEAN II-D SUBEOUTINE FOB* 
OPTICAL MABK SCOEING EEADEE OUTPUT. #ITEM+ 
OPTIMUM PLANT SIZE. (ANALYSIS OF FACTORS* 
OPTION. #FIVE CHOICE SPLIT-HALF EELIABILITY* 
OPTION. (SIBPLE ABALYSIS OF VABIABCE BITB* 
OPTIONAL FACTOB ANALYSIS AND ROTATION OF* 
ORDER ABERRATIOBS. »GEBEEAL BAY TBACE ABD* 
ORDER DIFFERENTIAL EQUATION BY BILNE'S* 
ORDER DIFFERENTIAI EQUATION. (SOLUTION FOB* 
OEDER DIFFEREBTIAL EQUATIOB. #SOLUTIOS FOB* 
ORDER LAG BITH OR WITHOUT DEAD TIME. #LEAST* 

ORDER OF ASSOCIATION. (IBDEX OF 1620-06.0.098 053 

OBDEE QUANTITIES FOR LINEAB DEMAND* 1620-10.1.011 110 

ORDER. (KELVIN FUNCTIONS OF FIRST 1620-03.0.007 038 

OEDER. (COBPUTATIOB OF BESSEL FUNCTIONS OF* 1620-03.0.005 038 
ORDER. (PARTIAL COEEELATIOBS - FIBST OE* 1620-06.0.064 049 
ORGANIZER FOB TEACHING. (STATISTICAL PROJECT 1620-06.0.216 067 
ORIENTED EQUATION SOLVER. (DOES - DISK 1620-05.0.037 042 

(ORTHOGONAL POLYNOBIAL COEFFICIENTS. 1620-03.0.003 038 

(OUTPUT ABALYSIS FOB LINEAR PROGRAMMING. 1620-10.1.012 111 
OUTPUT COBPRESSOR. (MULTIPURPOSE SPS CARD 1620-01.1.006 013 
OUTPUT EDITOR. (STUFF 1620-13.0.027 128 

OUTPUT IB BATRIX FORM. (COERELATIOB BATRIX* 1620-06.0.104 053 
OUTPUT OF FOURIER SYNTHESIS PEOGBAB. 1620-08.4.007 084 

OUTPUT PROGRAB. (MUSICAL 1620-11.0.033 121 

OUTPUT SUBEOUTINE. (UNIVEESAL 1620-12.3.001 126 

OUTPUT 1 AND OUTPUT 2. (ECONOBIC ABALYSIS OF* 1620-10.3.010 113 
OUTPUT. *flONITOR EQUIVALENCE TABLE CAED 1620-01.3.013 017 
OUTPUT. (ELECTEIC LOAD FLOW SINGLE LINE* 1620-09.4.049 104 
OUTPUT. «ITEB ANALYSIS FOE 1230 OPTICAL MARK* 1620-06.0.220 068 
OUTSTANDING COMPRESSION CBORDS. (THE* 1620-09.2.030 089 

(OVERLOAD RATINGS OF 65 DEGREES CENTIGRADE* 1620-09.4.060 105 
PACK COPY PROGEAB. (1620/1311 DISK 1620-01.6.104 023 

PACK. ■♦PICTURE- OF DISK 1620-01 .6. 145 028 

PACKER FCRMONITOR II. «DISK 1620-01.6.150 029 

PACKER. (DISK 1620-01.6.137 026 

PAIR COMPARISONS. *A PBOGEAM FOR 1620-06.0.180 064 

PAIR WISE COMBINATIONS OF TWO SETS OF* 1620-06.0.217 068 
PARALLELOGBABS. #TWO-DIBENSIOBAL ABSOBPTION+ 1620-08.4.017 085 
PARABETERS COHPDTED FBOB SHORT-CIECUIT+ 
(PART - PROCESSOB AND RESULT TESTER. 
(PABTIAL CORRELATIONS - FIBST OE FIBST AND* 
PARTIAL PIVOTAL. (GAUSS JOBDAN WITB 1620-05.0.026 042 

PARTIALLY BALANCED LATTICE - USU 52. 1620-06.0.105 054 

PASS ANALYSIS OF VARIANCE. (ONE 1620-06 .0. 060 048 

PASS CANONICAL CORRELATION PROGEAB. (ONE 1620-06.0.214 067 
PASS SIBULTANEOUS EQUATIONS SOLUTION. *MOSES+ 1620-05.0.040 043 
PASS SYSTEM. (FOURIER ANALYSIS - TWO OR THREE 1620-07.0.056 079 
PASSES. (RADIAL THBEE PHASE LIBE DROP* 1620-09.4.020 100 



1620-09.4.063 106 
1620-01.6.144 028 
1620-06.0.064 049 



XXI 



PASSIVE 

TITLE 
PASSIVE OBE-POBT BETWORKS. (CAUEH EXPANSIOBS* 
P1TCB FOB BOITIPIE LINEAR REGRESSION PBOGBAB* 
CATCH. (MONITOR I BISK DUBF 

PATH BODE ABD DUBBY ASSIGBBEBT TECBNIQOE* 
PATH SYSTEM NETBOBK. (LOOP LOCATOR FOB* 
PATB/SCHEDDLE EAB SBAPB GENEBATOE PBOGBAB. 
PATTERNS-DRIVEN ABTEBHA ARHAY. (ELECTRICAL* 
PDG FOBTBAB SYSTEB. tA MODIFIED 

#PDQ FOBTBAB (AB INTERPRETIVE PBOGBAB). 
PDS FOBTBAB (CARD) . *EBBOB FUNCTION* 

(PDQ FOBTBAB COMPRESSOR. 

(PDQ FOBTBAB DISK SYSTEM FOB 1620. 
PDQ. FOBTBAB. #C»D - AB OPEBATIBG SYSTEH FOE 
PDQ FOBTBAB. (GAMMA FUNCTION SUBROUTINE FOB 

(PDQ THIRD AITEBBATE SUBROUTINE. 
PEAK EINDEB. #HOLECULAB 

PEB FOB FOBTBAB (FOBBAT). (CAL-COBP 565* 
PEBALTY FACTOBS. (TBANSMISSION LOSSES ADD 
PEBCEBT EBD-POIBT DETEBBIBATIOB. 

#PEECE»TILE SCOBES FEEQUERCY DISTRIBUTIONS,* 

(PERFECT NUBBEE DEMONSTRATION PBOGBAB. 
PEBFOBBIBG OPERATIONS BITB COMPLEX BOBBEBS. 

(PERPETUAL CALEBDAB. 
PERPETUAL CAL1SDAR. (DATE INTERPRETER ANE 
PERSONAL PREFERENCE TEST SCOBIBG BY THE IBM* 

(PERT - PBOGBAB EVA1UATION ABD BEVIES* 

•PERT DATIBG ROUTINE. 

iPEBT. 

•PEBT-LESS. 
PBASE LIBE DBOP CALCULATION IB 2 PASSES. 
PHASE LIBE DBOP CALCULATIONS. (BADIAL TBBEE 
PHASE SHOET CIRCUIT STUDY PBOGBAB. iTBBEE 
PHASE. tPOBCB CBOSS BEFEBEBCED SYBBOL TABLE* 

(PICTURE OF DISK PACK. 
PILE VOLUME. (COAL 

(PIPE FRICTION HEAD LOSS CALCDLATIOBS IB* 
PIPE LENGTHS. (EQUIVALEBT 

PIPE BBTBOEK BY BABDY CBOSS SOLUTION. IBATEB* 
PIPE BETSOBKS. (HYDRAULIC ANALYSIS OF FLC« IB 
PIPE STEESS ANALYSIS. (HUITI ANCHOB 

PIPE STBESS ABALYSIS. (HOLTI-ANCHOR 

PIPB STBESS. tGEBEEAL 

PIVOTAL. tGAUSS JORDAN KITH PABTIAL 

PLANNING BADIAL DISTRIBUTION SYSTEHS. 
PLANNING. (GEBBRATXOB 

PLANS - OUTPUT 1 ABD OUTPUT 2. IECOBOBIC+ 

•PLANT GENEBATION FOB GIVEN INCBEBEBTAL COST. 
PLANT BECOBD BETHOC (BEVISED VFBSION) . 
PLANT SIZE. # ANALYSIS OF FACTOBS AFFECTING* 

♦PLOT A BLOCK DIAGBAH. 
PLOT ABALYSIS OF VABIANCE. (SPLIT 

PLOT CC ADDITIONAL COGO SUBROUTINES. (COGC 
PLOT COBTOUBS OF CONSTANT RESPONSE FOE A* 
PLOT FACTOBIAL. tABALYSIS OF COVABIABCE -* 
PLOT BELOCATABLE SUBROUTINE. tVABIABLE* 
PLOT SUBROUTINE FOB FOBTBAN II-D. 

tPLOT SUBBOOTIBE FOB FOBTBAB BITB FOBBAT. 

tPLOT SUBBOOTIBE FOB FOBTBAN. 
PLOT. (EARTBBORK 

PLOT, WRIT. (RELOCATABLE SUBROUTINES ABS, 
PLOT-BACK PROGRAM. #FINITE EO0BIEB ANALYSIS;* 

tPLOTTEE (110X110). 
PLOTTER SUBROUTINE PEB FOE FORTRAN (FOBBAT) . 
PLOTTER SUEROUTINE. #1620/1413 FOBTBAB BITB* 
PLOTTER SUBROUTINE, FROGRAM (CABD) . (FORTRAN* 
PLOTTEB SUBBOUTIBES (CARD) . tHCBITCR II* 
PLOTTER SUEBOUTIBES PBOGBAB (CARDS). 
PLOTTEB SOEROUIIBES, PBOGBAB (CABD). 
PLOTTEB. MULTIPOINT 

PLOTTER. #EORTRAN FORHAT SUBROUTINE FOE* 
PLOTTEB. (FORTRAN II SUBBOUTIBE FOB PLOTTIBG* 
PLOTTING PBOGBAB FOR THE OUTPUT OF FOUBIEB* 
PLOTTIBG PBOGBAB. tDATA 

PLOTTING SUBROUTINE PROGRAB. #G«APH 2 - A* 
PLOTTING SUBROUTINE. *STRAIGHT LINE 

PLOTTING SITH A CAL-COHP PLOTTER. #FORTRAN* 
PLOTTING »ITH A CAL-COBP PIOTTEE. #FORTBAN* 
PLOTTIBG. #ROOT LOCUS 

PLOTTING. (GBADE NORHALIZIBG AND 

PLOTTING. (FORTRAB CALL SUBROUTINES FOE 
PLUG DECK TO COGO I. (SPIRAL 

PLUS DISTBIBUTIOB FACTOB CALCULATICS ABD* 
POINT ARITHMETIC SUBROUTINES. iDOUBLE* 
POINT CONVEESIOB SUBBOUTIBES. #SPS FLOATIBG 
POIBT DIVISICB OB MULTIPLICATION REGULATOR* 
POINT FORBAT SUBBOUTIBES FOR SPS II-D. 
POINT. IFORTRAB II FOR AUTCBATIC FLOATIBG 
POIBT. (FIXED POIBT DIVISICB OB* 
POINT.. (SIRE/COSINE SUBBOUTIBE - FIXED 
POIBTS. #GEODESIC 

POINTS. (SIMPLE COBBELATICN COEFFICIENT* 
POISSOS BINOMIAL DISTRIBUTIONS. (FITTING 
POISSCN NORBAL STUDENT T/CBI-SOUABE F* 
POISSON WITH ZEBOES. #EITTING DISTRIBUTIONS* 
POLAB FOBBS. (CONVERSION OF KELVIN FUNCTIONS* 
POLAB MOMENTS OF INERTIA AND ALLIED DATA. 
POLES ABD ZEEOS OF AMPLIFIERS TRANSFER* 
POLYHEDRON (CRYSTAL) . t ELEMENTS OF A 

POLYNOMIAL ADJUSTMENT OF AEBIAL* 
POLYBOBIAL COEFFICIEBTS. tORTHOGOBAL 

#POLYNOMIAL CURVE FITTING - NFHTONS DIVIDED* 
POLYNOMIAL CURVE FITTING BY LEAST SQUARES. 

tPOLYNCMIAL CUBVE FITTIBG USIBG LEBGENDBE* 
POLYNOMIAL EQUATION. #BO0TS OF 

POLYNOMIAL EQUATION. (CALCULATION OF BOOTS* 
POLYNOMIAL EQUATION. (CALCULATION OF THE* 

(POLYNOMIAL GENEBATION AND IBTEBEOLATIOB BITB 
POLYNOMIAL OF A REAL SQUARE MATRIX. 

(POLYNOMIAL REGRESSION PBOGBAB. 

(POLYNOMIAL ROCT SOLVES. 
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PROGRAM 

1620-09. 

1620-06 

1620-01 

1620-10 

1620-10 

1620-10 

1620-09 

1620-02. 

1620-02. 

1620-07. 

1620-02. 

1620-02. 

1620-02. 

1620-07. 

1620-02. 

1620-08. 

1620-13. 

1620-09. 

1620-06. 

1620-06 

1620-11 

1620-02 

1620-11 

1620-11 

1620-06 

1620-10. 

1620-10 

1620-10 

1620-10 

1620-09 

1620-09 

1620-09 

1620-01 

1620-01. 

1626-09. 

1620-09. 

1620-09. 

1620-09. 

1620-09. 

1620-09. 

1620-09. 

1620-09. 

1620-05. 

1620-09. 

1620-09. 

1620-10. 

1620-09. 

1620-09. 

1620-10. 

1620-01. 

1620-06. 

1620-09. 

1620-06. 

1620-06. 

1620-13. 

1620-01. 

1620-01. 

1620-01 

1620-09 

1620-07 

1620-06 

1620-13. 

1620-13 

1620-LM- 

1620-LN- 

1620-LH- 

1620-LM- 

1620-LN- 

1620-01. 

1620-01 

1620-01. 

1620-08. 

1620-01. 

1620-09. 

1620-01. 

1620-01 

1620-01. 

1620-09. 

1620-01 

1620-01. 

1620-09 

1620-09 

1620-07. 

1620-01 

1620-03 

1620-01 

1620-FO- 

1620-03 

1620-07 

1620-07. 

1620-06 

1620-06 

1620-06 

1620-06 

1620-03, 

1620-09 

1620-09 

1620-08. 

1620-09 

1620-03 

1620-07 

1620-06 

1620-07 

1620-07 

1620-07 

1620-07 

1620-07 

1620-07 

1622-07 

1620-07 



HO. PAGE TITLE 

4.026 100 POLYBOBIAL. (BEAL AND COMPLEX ROOTS OF 

0.011 043 POLYNOMIAL. (ALGEBBAIC SOLUTION FO GENEBAL* 

6.143 027 POLYNOMIALS EQUATION. (CALCULATION OF BOOTS* 

3.030 114 POLYNOMIALS. (BEAL BOOTS OF CUBIC 
3.047 117 POLYBOMIALS. (CHEEICHEV ECONOMIZATIOB OF 
3.020 113 POLYNOMIALS. (POLYNOMIAL CUBVE FITTING USING* 
4.061 106 POLYBOMIALS. (PBOGBAB TO DETERMIBE ABD* 
0.066 037 POPULATIONS. (SBEEP OUT METBOD FOB* 

0.031 032 (POBTA - A GRADING PROGRAM. 

0.063 080 POSTA-PUBCH TEST CARDS. (SCOBIT-SCORIBG AND* 

0.055 035 (PORTFOLIO SELECTIONS - DIAGONAL MODEL (40K) . 

0.061 036 POSITION COMPUTATION. (INVERSE GEODETIC 

0.659 036 POST - PROCESSOR FOB MILWAUKEE - MATIC 11* 

0.062 080 (POST PROCESSOB CONCEPTS FOR THE BUBGBASTBB* 

0.049 034 (POST PROCESSOR FOR LE BLOND TAPE-TURN LATHE* 

4.013 085 POST-PROCESSOR FOR CINTIMATIC TURRET DRILL* 
0.005 126 (POBEB CURVES FOB TBE BEGATIVE BIBOBIAL* 

4.008 099 POBEB DESIGN. (TRANSMISSION 
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SEABCH AND INFORMATION BETBIEVAL. tANSIR -♦ 

•SEARCH AND MEMORY PRINT - SABP. 
SEARCHING PROGRAB, CS3. (CARD 

•SEASONAL ADJUSTMENT PROGRAB. 

•SEASONAL ADJUSTBENT. 
SECOND ORDER. »EARTIAL CORRELATIONS - FIRST* 
SECTION. (BASS DIAGRAM MODEL WITH CROSS 
SEDIMENT-LOAD COMPUTATION FOB RIVERS AND* 
SELECTION OF A CYCLE LENGTH FOR FIXED TIBE* 

•SELECTION OF ECONOMIC CONDUCTOR SIZE* 
SELECTION. (HELICAL GEAR 

SELECTIONS - DIAGONAL MODEL (40K) . (PORTFOLIO 

(SELECTIVE CARD BEPBODUCEB. 

(SELECTIVE TRACE. 
SELF-LOADING PBOGBAMHEBS AID FOR CONSOLE* 
SEQUENCE ON CUE) . (REPRODUCER* 
SEQUENTIAL ADDITIONS AND DISK UTILITY* 
SERIES - PROGRABS I AND II. (COBPOSITE BEAB 
SEBIES - PBOGBABS I THRU IX AND XCIX. 
SERIES APPROXIMATION TO THE ERROR FUNCTION* 
SERIES OR SAMPLE DATA. (BASIC* 
SET. (COMBINATIONAL SWITCHING FUNCTION* 
SETS OF VARIABLES. (CORRELATIONS OF ALL PAIR* 
SETTING. (INTENSITY CORRECTION PROGRAM FOR* 
SHIFT COMPUTATIONS PROGRAB. (RADIAL ENERGY* 
SHORT-CIRCUIT ADMITTANCE PARAMETERS. 
SHOBT-CIRCUIT. (SCALAR 

SHOWN BENEATH CLASS HAXIBA. (FREQUENCIES 
SIGNALS FOR AXIHAL ANDWITH. (SYNCHRONIZING* 
SIGNALS. (THE SEIECTION OF A CYCLE LENGTH* 
SIBPSONS RULE. (NUMERICAL CALCULATIONS OF* 
SIMULATED PLANT RECORD BETHOD+ 

SIMULATION AND DEMONSTRATOR. (EBC BASEBALL 
SIMULATION AND OPERATING COST SYSTEM. 
SIMULATION EXERCISE/CARD/. tMONABUS - A* 

(SIMULATION OF THE IBM 7040/7044 ON THE IBB* 
SIMULATION PROGRAM. (JANET - DIGITAL ANALOG 
SIMULATION PROGRAM. (JANET-II - DIGITAL 
SIMULATION SUBROUTINES. (INS, TNF, AND MF 
SIBULATOR - 1620 VERSION FOR 1401-1620. 
SIBULATOR AND FARB BANAGFBENT DECISION* 
SIBULATOR. #CARLETON BINARY 

SIMULATOR. (GENERAL SYSTEBS 

(SIBOLTANEOUS EQUATION SOIUTION AND BATRIX* 

(SIBULTANEOUS EQUATION SOLUTION. 
SIMULTANEOUS EQUATIONS SOIUTION. (MOSES -♦ 
SIMULTANEOUS FIRST-ORDER DIFFERENTIAL* 
SIMULTANEOUS LINEAR EQUATIONS. (SOLUTION OF 
SIBULTANEOUS LINEAR EQUATIONS. (BATRIX* 
SIBULTANEOUS LINEAR EQUATIONS. (SOLUTION OF* 
SIBULTANEOUS LINEAR EQUATIONS. (SUBROUTINE* 



SIBULTANEOUS 
PROGRAM NO. PAGE 
1620-09.4.038 102 
1620-09.4.064 106 
1620-09.4.046 103 
1620-07.0.013 075 
1620-07.0.005 074 
1620-03.0.001 037 
1620-07.0.032 076 
1620-07.0.029 076 
1620-07.0.073 081 
1620-07.0.033 076 
1620-07.0.017 075 
1620-07.0.041 077 
1620-03.0.009 038 
1620-07.0.036 077 
1620-07.0.014 075 
1620-06.0.165 062 
1620-06.0.145 059 
1620-06.0.094 052 
1620-06.0.075 050 
1620-06.0.136 058 
1620-07.0.043 077 
1620-04.0.004 039 
1620-04.0.005 039 
1620-09.7.005 109 
1620-10.2.013 112 
1620-09.2.069 095 
1620-01.6.100 023 
1620-06.0.158 061 
1620-09.2.023 088 
1620-09.4.053 105 
1620-09.4.052 104 
1620-06.0.228 070 
1620-08.4.003 084 
1620-09.4.063 106 
1620-10.3.040 115 
1620-10.3.043 116 
1620-10.3.040 115 
1620-10.3.050 117 
1620-10.3.039 115 
1620-10.3.044 116 
1620-10.3.045 116 
1620-10.3.046 117 
1620-10.3.017 113 
1620-10.3.043 116 
1620-06.0.232 071 
1620-06.0.186 065 
1620-06.0.115 055 
1620-06.0.165 062 
1620-06.0.141 058 
1620-13.0.028 128 
1620-13.0.003 126 
1620-13.0.031 129 
1620-06.0.220 068 
1620-06.0.135 057 
1620-13.0.036 130 
1620-06.0.165 062 
1620-06.0.179 063 
1620-13.0.011 126 
1620-06.0.140 058 
1620-01.6.064 020 
1620-01.6.100 023 
1620-01.6.070 021 
1620-10.3.024 114 
1620-06.0.054 048 
1620-06.0.064 049 
1620-09.2.043 091 
1620-06.0.160 061 
1620-09.2.083 097 
1620-09.4.004 098 
1620-09.5.001 107 
1620-10.3.035 115 
1620-01.6. 699 022 
1620-01.4.001 017 
1620-01.6.107 023 
1620-01.6.119 024 
1620-01.6.134 026 
1620-09.2.057 093 
1620-09.2.053 093 
1620-07.0.077 081 
1620-06.0.158 061 
1622-09.4.062 106 
1620-06.0.217 068 
1620-08.4.002 083 
1620-EO-05X 004 
1620-09.4.063 106 
1620-09.4.052 104 
1620-06.0.227 070 
1620-09.2.082 096 
1620-09.2.083 097 
1620-07.0.043 077 
1620-09.4.009 099 
1620-11.0.032 121 
1620-09.2.032 089 
1620-11.0.052 125 
1620-02.0. B37 033 
1620-02.0.053 035 
1620-02.0.054 035 
1620-01.6.159 030 
1620-CS-04X 002 
1620-10.2.010 112 
1620-02.0.035 032 
1620-10.2.012 112 
1620-09.4.015 100 
1620-05.0.002 040 
1620-05.0.040 043 
1620-04.0.006 039 
1620-05.0.007 040 
1620-06.0.037 046 
1620-05.0.020 041 
1620-05.0.035 042 
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SIN 

TITLE 

SIH AND EXP SUBROUTINES FOBTRAN II. 
• SINE/COSINE SUBROUTINE - FIXED POINT.. 
•SIXTEEN-TWENTY UNIVERSAL FUNCTION FITTEE. 

SIZE (SPECIFIC CASE NEB ENGLAND SYSTEM* 
SIZE. (ANALYSIS OF FACTORS AFFECTING OPTIMUM* 
SIZE-NON-SORT-ANOV. *TEB MODEL-EQUAL CELL 
•SKEWED BBIDGF ELEVATIONS. 
SLOPE STABILITY ANALYSIS. (COMPUTER* 
SMOOTHING (FORECASTING) . (EXPONENTIAL 

SMOOTHING PROGBAM. (EXPONENTIAL 

tSNOBOL 3 A LIST PROCESSING LANGUAGE. 
•SOLUTIONS FOE DETERMINATION OF LOOP CUBBENTS 
SOLUTIONS FOE BECTANGULAB GAHES. 
SOLUTIONS FOR SLOPE STABILITY ANALYSIS. 
SOLVER. #EOLYNOBIAL BOOT 

SOLVEB. #DOES - DISK OBIENTED EQUATION 
SOBT PROGBAB KITS FLEXIBLE INPUT. (HISSING* 
♦SORT-LIBRARY FUNCTION (FOBTBAN II) . 
SORT-HERGE (CARD). #1620/1311 

SORTING SUBROUTINE FOE FORTRAN II-D. 
•SPACED - SELF-LOADING PROGRAMMERS AID FOE+ 
SPANS BY THE CONJUGATE BEAM METHOD. 
SPEARMAN'S RBO CORRELATION COEFFICIENT. 
SPECTEUB. *AUTO CORRELATION-POWER 

SPEED SPS ASSEMBLER. #N.C.E. HIGH 

•SPEK/SPEEDI KATE. 

•SPIRAL CURVE LAYOUT. 

♦SPIRAL PLUG DECK TO COGO I. 

♦SPLIT PLOT ANALYSIS OF VARIANCE. 
SPLIT PLOT FACTORIAL. (ANALYSIS OF* 
SPLIT-HALF RELIABILITY PROGRAM BITB* 
SPLIT-PLCT FACTORIAL DESIGN. (ANALYSIS OF* 
SPLIT-SPLIT-PLOT DESIGN. ♦ANALYSIS OF 
SPOT DIAGRAM PROGRAMS. #VIGNETTED APEBATUBE* 
SPRING DESIGN, DYNABIC LOAD. •COHPBESSION 
SPS (CARD). #1620/1710 

SPS ASSEMBLER BY BICE UNIVERSITY. (1620 
SPS ASSEMBLER. (N.C.E. HIGH SPEED 

SPS CAED OUTPUT COBPRESSOR. (MULTIPURPOSE 

♦SPS FLOATING POINT CONVERSION SUBROUTINES. 
SPS II-D PSEUDO PROCESS PHASE. (PUNCH CECSS+ 
SPS II-D. (MACBOINSTRUCTION FLOATING POINT* 

♦SPS III (CARD) . 
SPS III (CARD) . ♦1620/1143 

(SPS III (TAPE) . 

(SPS LABEL REFERENCE INDEXER. 

♦SPS OEJECT DECK ANALYZER. 

♦SPS TRAVERSE AND CURVE DATA PROGRAM. 

♦SPS UNPACKING. 

♦SPS VARIATE DIFFERENCE PROGBAM. (AN 

SPS. (CARLETON 

SPS. •FLOATING COMPARE SUEEODTINE FOR 

SQUARE DIFFERENCES, NON LINEAR CURVE FIT. 
SQUARE MATRIX. (CALCULATION OF THE* 

•SQUARE ROOT SUBROUTINE. 
SQUARE ROOT SUBROUTINE. (VARIABLE FIELD 
SQUARE. (CHI 

SQUARE, BHEN EXPECTATIONS ARE SMALL. (THE* 
SQUARES ADJUSTMENT OF PRECISE SURVEY* 
SQUARES AND PRODUCTS, CORRELATIONS. (SUB OF 
SQUARES COSINE FIT-IEM 704 COFIT PROGRAM* 
SQUARES FIT OF RESPONSE CORVES TC FIRST* 
SQUARES FIT OP VAPOR PRESSURE DATA BY THE* 
SQUARES PROGRAM. (TBO-IN-ONE LEAST 

SQUARES USU 31. (ANALYSIS OF* 

SQUARES. ♦FOUR TYPE POLYNOMIAL CURVE FITTING* 
SQUARES, N. (BEAN AND STANDARD DEVIATION,* 
STABILITY ANALYSIS. (COMPUTER SOIUTICNS FOR* 
STABILITY FOR TEN MACHINES. (TRANSIENT 
STACK - VIBRATION CALCULATIONS BASED ON* 
STAKEOUT. ♦VERTICAL ALIGNMENT AND 

STANDARD DEVIATION AND INTERCORRELATION* 
STANDARD DEVIATION AND VARIANCE. #MEAN 
STANDARD DEVIATION PROGRAM. ♦VARIABLE FORMAT* 
STANDARD DEVIATION SORT PROGRAM WITH* 
STANDARD DEVIATION. (KARRER METHOD OF* 
STANDARD DEVIATION, AND VARIANCE BY ROBS AND* 
STANDARD DEVIATION, SUB 3F SQUARES, N. #BEAN* 
STANDARDIZATION OF VARIABLES. (TEST FOB* 
STANDARDIZED SCORES, AND RATINGS FOR THE* 
STATE IDENTIFICATION OF AUTOMATA. 
STATEBENT COMPILER SUBROUTINE. #FCRBAT 
STATEMENT PRESELECTOR. #FORTRAN II FORMAT 
STATEMENTS. ♦TRUTH TABLES FOR SYMBOLIC LOGIC 
STATION SUMMARIES. (ANALYSIS OF VARIANCE* 
STATISTICAL CHECK PROGRAM. (CONTINUOUS* 

♦STATISTICAL PROJECT ORGANIZER FOR TEACHING. 
STATISTICS - HYPRG. (HYPERGEOMETRIC 

•STATISTICS I. 
STATISTICS. •DESCRIPTIVE 

STATISTICS. •TIPS - TENNESSEE INTERPRETIVE* 
STATISTICS/FUNDAMENTAL ANALYSIS OF FINITE* 
STEADY HEAT CONDUCTION. (H-104,* 

•STEAK AND WATER PROPERTIES AND EFFICIENCY* 
STEEL BEAM DESIGN. *CONTINDOUS EEAB ANALYSIS* 
STEEL COMPOSITE BEAM DESIGN. •BELDED 

STEPPING SWITCH CONTROL. •AUTOSPOT II* 

•STEPWISE MULTIPLE LINEAR REGRESSION. 
STEPWISE MULTIPLE LINEAR REGRESSION. #BATCH+ 

•STEPWISE REGRESSION (MODIFICATION OF BIND09) . 
STEPWISE REGRESSION ANALYSIS PROGRAM. •STRAP 
STORAGE ROUTINE. ♦DDSR - DISK DATA 

•STRAIGHT LINE PLOTTING SUBROUTINE. 
STRAIGBTENFR. #EORTRAN PROGRAM 

•STRAP - STEPWISE REGRESSION ANALYSIS PROGRAM. 
STREAMS. *SUSPENDED SEDIBENT-LCAD* 
STRESS ANALYSIS OF A FLANGED TAPERED HUB. 
STRESS ANALYSIS. •BUITI ANCHOR PIPE 

STRESS ANALYSIS. »MUITI-ANCHOR PIPE 

♦STRESS. 
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PROGRAM 

1620-07. 

1620-07. 

1620-CA- 

1620-09. 

1620-10. 

1620-06. 

1620-09. 

1620-09. 

1620-10. 

1620-10. 

1620-01 

1620-09 

1620-07. 

1620-09. 

1620-07. 

1620-05. 

1620-06. 

1620-01 

1620-SM' 

1620-01 

1620-01 

1620-09. 

1620-06 

1620-06 

1620-01. 

1620-08. 

1620-09. 

1620-09. 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-06. 

1620-EO- 

1620-09 

1620-SP- 

1620-01. 

1620-01. 

1620-01. 

1620-01. 

1620-01. 

1620-01. 

1620-SP- 

1620-SP- 

1620-SP- 

1620-01. 

1620-01. 

1620-09. 

1620-06. 

1620-06, 

1620-02, 

1620-07, 

1620-06. 

1620-07. 

1620-07. 

1620-03, 

1620-06, 

1620-06. 

1620-09. 

1620-06. 

1620-06. 

1620-07. 

1620-09. 

1620-06 

1620-06. 

1620-06. 

1620-06 

1620-09 

1620-09. 

1620-09, 

1620-09 

1620-06 

1620-06 

1620-06 

1620-06. 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 

1620-13 

1620-01 

1620-01 

1620-01 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 

1620-06 

1620-09 

1620-09 

1620-09 

1620-09 

1620-10 

1620-06 

1620-06 

1620-06 

1620-06 

1620-01 

1620-01 

1620-01 

1620-06 

1620-06 

1620-09 

1620-09 

1620-09 

1620-09 



NO. PAGE 
0*038 077 
0.018 075 
02X 001 
4.004 098 

3.052 118 
0.213 067 
2.009 086 
2.020 087 
2.008 111 
2.007 111 
D.02II 018 
4.039 102 
0.015 077 
2.020 087 
0.013 075 
0.037 0142 
0.213 072 
6.069 021 
047 009 
6.133 026 
6.107 023 
2.063 094 
0.172 063 
0.147 059 
1.029 011 

2.004 083 
2.075 096 
2.071 095 
0.061 049 
0.023 044 
0.234 071 
0.069 049 
0.161 061 
03X 004 
5.002 107 
020 010 

1.028 011 

1.029 014 
1.006 013 

6.053 020 
1.033 015 
6.136 026 

027 010 
035 011 

028 010 
1.014 013 
6.060 020 
2.018 087 
0.238 072 
0.187 065 
0.039 033 
0.050 078 
0.181 064 
0.012 077 
0.005 074 
0.001 037 
0.099 053 
0.182 061 
2.016 091 
0.010 047 
0.112 058 
0.075 081 
3.016 098 

.0.151 060 
0.086 051 
0.157 060 
.0.177 063 
.2.020 087 
,1.013 099 
,2.084 097 
,2.081 096 
,0.239 072 
0.051 047 
.0.206 066 
.0.243 072 
.0.212 067 
0.136 058 
.0.177 063 
,0.194 065 
,0.165 062 
0.035 129 
.6.138 027 
.6.086 022 
.6.152 029 
,0.123 056 
,0.043 047 
,0.216 067 
,0.106 051 
,0.039 046 
,0.211 067 
,0.183 064 
,0.158 061 
.5.004 107 
,7.007 109 
,2.017 087 
.2.079 096 
,4.010 118 
,0.006 043 
.0.251 074 
.0.031 045 
.0.066 049 
.1.036 016 
.6.140 027 
.4.027 018 
0.066 049 
.0.160 061 

7.005 109 
.4.030 101 
.4.040 102 
.7.014 110 



TITLE PROGRAM 

STRESS. (GENERAL PIPE, 1620-09. 

STRIP FORMATION - 6131. #AERIAL TBIANGOLATION 1620-09. 
STBIP 6132 ♦ 6133. (UNCOBBELATED AND* 1620-09 

STRUCTURE ANALYSIS FOR PAEALLELOGRABS. 1620-08 
STRUCTURE ANALYSIS. tAESORPTION CORBECTION+ 1620-08. 
STRUCTURE ANALYSIS. #TBO-DIHEHSIONAL+ 1620-08. 

(STRUCTURE FACTOR CALCULATION IN X-RAY* 1620-08. 
STRUCTURED, OBJECTIVE RORSCHACH TEST/SORT. 1620-06, 
STRUCTURES. (GENERAL VIRTUAL WOBK ANALYSIS OF 1620-09, 
STUDENT SCHEDULING HANDBOOK. (LUNCH STUDY* 1620-10 
(STUDENT SCHEDULING SUPPLEMENTARY PROGRAB. 1620-10 

(STUDENT SCHEDULING TECHNIQUE USING DEFINED* 1620-10, 

•STUDENT T TEST. 1620-06 

STUDENT T/CHI-SQUARE F PROBABILITIES. 1620-06 

STUDENTS PROGRAB EXECUTE AND CONTROL. 1620-02 

STUDY EXPLODES AND STUDENT SCHEDULING* 1620-10 
STUDY PROGRAM. (THREE PHASE SHORT CIRCUIT 1620-09 

(STUFF OUTPUT EDITOR. 1620-13 

SUB-SABPIES. (ANALYSIS OF VARIANCE,* 1620-06 

SUBCLASS FREQUENCIES. (ANALYSIS OF VABIANCE* 1620-06 
SUBCLASS FREQUENCIES-UCRBL63. ♦ANALYSIS OF* 1620-06 
SUBCLASS NUBBERS. ♦NESTED ANALYSIS OF* 1620-06 

♦SUBDIVISION PROGRAM. 1620-09 

SUBGROUPS BITH UNEQUAL OR EQUAL N. (ANALYSIS* 1620-06 
SUBPROGRAM. ♦CHAR ANNOTATION 1620-13 

SUBPROGRAM. (RANDOM EXPONENTIAL NUMBER* 1620-06 
SUBROUTINE-POSITIVE ARGUMENTS. (FORTRAN WITH* 1620-07 
SUBROUTINES (CARD) . (MONITOR II* 1620-LB' 

SUBROUTINES ABS, DEF, PLOT, WRIT. 1620-07 

SUBBOUTINES FOB FOBTRAN II. ♦FORCOM 1620-01 

SUBROUTINES FOR FORTRAN II-D. (FOBCOM II-D - 1620-01 
SUEBOUTINES FOB FOBTRAN H/FORMAT. (FORCOM 1620-01 
SUBROUTINES FOR FORTRAN BITH FORMAT, FILE* 1620-07 
SUBROUTINES FOR PLOTTING. (FORTRAN CALL 1620-01 
SUBBOUTINES FOR SPS II-D. (BACROINSTRDCTION+ 1620-01 
SUBBOUTINES FOR USE IN SYMBOLIC PROGRAHBING* 1620-01 
SUBROUTINES FOBTBAN II. (BELOCATABLE COS,* 1620-07 
SUBROUTINES PROGRAM (CARDS). (FORTRAN II,* 1620-LB 
SUBROUTINES TO READ CR WRITE IN OTHER THAN* 1620-01 
SUBBOUTINES. (TBS, TNF AND MF MACRO 1620-01 

SUBBOUTINES. (FORTRAN 90 COMPILER AND 1620-02 

SUBROUTINES. (UTO FOBTRAN PEOCESSOE AND 1620-02 
SUBROUTINES. (TNS, TNF, AND MF SIMULATION 1620-01 
SUBBOUTINES. (COGC PLOT CC ADDITIONAL COGO 1620-09 
SUBROUTINES. (SPS FLOATING POINT CONVERSION 1620-01 
SUBBOUTINES. (DOUBLE PRECISION FLOATING* 1620-07 
SUBBOUTINBS, PROGRAM (CARD). (FORTRAN II-D,* 1620-IM 
SUBSET CELL FREQUENCY. (1 TO 1 WAY ANALYSIS* 1620-06 

(SUM OF SQUARES AND PRODUCTS, CORRELATIONS. 1620-06 
SUM 3F SQUARES, N. (BEAN AND STANDARD* 1620-06 
SUMMARIES. (ANALYSIS OF VIBIANCE RANDOMIZED* 1620-06 

♦SUPER LISTER. 1620-01 

♦SUPEB-GO FORTRAN PROCESSOR. 1620-02 

SUPERMARKET MANAGEMENT GAME. ♦BOILERMAKER 1620-11 
SUPPLEMENTARY PROGRAM. ♦STUDENT SCHEDULING 1620-10 
SUPPLY BUSINESS MANAGEMENT GAME. 1620-11 

SUPPLY ENGINEERING USING THE DARCY BETHOD. 1620-09 
SURFACE PROFILE SAN2-X. ♦WATER 1620-09 

(SUSPENDED SEDIMENT-LOAD COBPUTATION FOB* 1620-06 

(SWEEP OUT METHOD FOB DETERHINING BANK OF A* 1620-06 
SWITCH CONTROL. (AUTOSPOT II POST-PROCESSOR* 1620-10 
SWITCHING FUNCTION SUBROUTINE SET. 1620-09 

♦SX-1.01 - TRAVERSE AXIS. 1620-09 

SYLLOGISM. ♦A DEMONSTRATION PROGRAM IN LOGIC* 1620-13 
SYHBOL TABLE FOB BONITOE I SPS II-D PSEUDO* 1620-01 
SYMBOLIC LOGIC STATEMENTS. (TBUTH TABLES FOR 1620-01 
SYMBOLIC PBOGRAMMING FOR THE CARD 1620. 1620-01 

♦SYMBOLIC PROGRAMMING SYSTEM (CARD I/O) . 1620-SP 
SYMBOLIC PROGRAMMING SYSTEM. ♦AFIT 1620-01 

SYBBOLIC PBOGRAMMING SYSTEM. *AFIT LOAD AND 1620-01 
SYMBOLIC PROGRAMMING SYSTEM. ♦TYGO -+ 1620-01 

SYBBOLIC PECGRAMMING SISTEB, MODIFIED FOR* 1620-01 
SYMETRICAL RIGID FRAME ANALYSIS. 1620-09 

SYMMETRIC AND ASYMMETRIC MATRICES. 1620-06 

SYMMETRIC AND ASYMMETRIC MATRICES. ♦MISSING* 1620-06 

♦SYNCHRONIZING TBAFFIC SIGNALS FOE AXIHAL* 1620-09 
SYNTHESIS PROGRAB FOR X-RAY CRYSTALLOGBAPHY. 1620-08 
SYNTHESIS PROGRAB FOR X-RAY CRYSTALLOGRAPHY. 1620-08 
SYNTHESIS PROGRAB. (ALPHABETIC PLOTTING* 1620-08 
T-SQUARE. *HOTELLINGS 1620-06 

T-TEST OPTION. ♦SIMPLE ANALYSIS OF VARIANCE* 1620-06 

•T-TEST PROGRAM FOB 19X19 MISSING DATA AND* 1620-06 
T/CHI-SQUARE F PROEAEIIITIES. ♦COMPUTATION* 1620-06 
TABLB CABD OUTPUT. ♦BONITOE EQUIVALENCE 1620-01 
TABLE FOR BONITOR I SPS II-D PSEUDO PROCESS* 1620-01 

♦TABLE LOOK-UP PROGRAB. 1620-06 

♦TABLE LOOKUP, NO BRANCH AND TRANSMIT -+ 1620-01 
TABLE OR RAW DATA. •THREE WAY INDEPENDENCE* 1620-06 
TABLE OR RAW DATA, USU 22. *TWO WAY* 1620-06 

TABLE TEST. tMONITOR DIM AND EQUIVALENCE 1620-01 
TABLE. •FISHERS EXACT PROBABILITY FOB A 2X2 1620-06 
TABLES FOR SYMBOLIC LOGIC STATEMENTS. ♦TRUTH 1620-01 
TABLES. *INTERPOLATION OF ATOMIC SCATTERING* 1620-0 

•TABTBAN INTEEPEETIVE PBOGRAMMING SYSTEM. 1620-02 

•TABULATE NUMERIC DATA DECKS ON 1443 PRINTER. 1620-13 
TABULATION PROGRAM C. A. S. T.. *CEOSS AND* 1620-06 
TAC TOE - A LEARNING PROGRAB. #TIC 1620-11 

TALLY PROGRAM (TALLY) . ^BREAKDOWN AND 1620-06 

TAPE-TURN LATHE WITH BABK CENTUBY NUBEBICAL* 1620-10 
TAPERED HUB. »S-109 STRESS ANALYSIS OF A* 1620-09 
TAU AND SPEARMAN'S RHO CORRELATION* 1620-06 

TBP-TO-ASTB DISTILLATION CONVERSIONS. 1620-09 

TEACH. ♦FORTRAN 1620-13 

TEACHING. ♦STATISTICAL PROJECT ORGANIZER FOR 1620-06 
TEAHS IN A DEBATE TOURNAMENT. (A COMPUTER* 1620-13 
TEMPERATURE OF CHEMICAL REACTIONS. 1620-09 

TEMPERATURE, NO DISSOCIATION. (ADIABATIC 1620-09 
TENNESSEE INTERPRETIVE PROGRAM FOE* 1620-06 

TENSION CALCULATIONS. ♦GENERALIZED SAG AND 1620-09 
TEST AND T TEST USU 32. »HOMOGENEITY OF* 1620-06 
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TITLE 
TEST CARDS. ♦SCORIT-SCORING AND ITEM* 
TEST FOE HOBOGENEITY OP VARIANCE. #BART1ETTS 

♦ TEST FOR NCRMAIITY WITH PROVISION FOR* 
TEST MEAN AHD STAKDARD DEVIATION PROGRAM. 
TEST OF SEAN DIFFERENCES. ^MULTIPLE RANGE 

#TEST SCORE FREQUENCY DISTRIBUTION PROGRAH. 
TEST SCORING BY THE IBB 1620. ♦EDHARDS* 
TEST SCORING PROGRAH - UHTS. #UNIVERSITY OF* 
TEST SCORING PROGRAH. (NORTHEASTERN 
TEST SCOHING PROGRAH. ((UNIVERSITY OF* 
TEST SCORING. #CAST - COBPOTER ASSISTED 
TEST USU 32. fHOHOGENEITI OF VARIANCE TBST+ 
TEST WRITTEN IN FORTRAN. .' ♦HANN-BHITNBY 
TEST. ♦STUDENT T 

TEST. ♦HANN-HHITNEY 

TEST. «NILCOXO» TBO-SAHELE 

TEST. *HONITOR DIH AND EQUIVALENCE TABLE 
TEST, USING HARTERS CRITICAL VALUES, FOR P* 
TEST/SORT. tSCORING, STANDARDIZED SCORES,* 
TESTER. »PART - PROCESSOR AND RESULT 

♦TESTING REGRESSION. 
TESTS. #HUNT - HOFSTRA UNIVERSITY+ 
THEORY DEMONSTRATION. ♦ELEMENTARY NUHBER 

#THIEIE-GEDDES HETHCD FOR KULTICCBFONENT+ 
THREE-FACTOR FACTORIAL. *ANALYSIS OF* 

#THREE- IN-ONE CURVE FITS HYPEREOLIC,+ 

♦ 1IC TAC TOE - A LEARNING PROGRAH. 
•1IC-TAC-TOE DEBONSTRATION. 

TIHE DISTEIBUTIOB. ♦EQUIPBEHT AND PROJECT 
TIHE PROGRAH. #REACTION 

TIHE TRAFFIC SIGNALS. #THE SELECTION OF A* 
TIHE. #LEAST SQUARES FIT OF RESPONSE CURVES* 
TIHE. ♦STUDENT SCHEDULING TECHNIQUE USING* 

♦ TIPS - TENNESSEE INTERPRETIVE PROGRAH FORt 
TBF AND HF HBCBO SOBROUTIBES. #TBS, 
TBF, AND HF SIHULATION SUBROUTINES. #TNS, 

#TNS, TNF AND BF HACRO SUEROUTINES. 

#TBS, TNF, ABD HF SIHULATION SUEROUTINES. 
TOE - A LEARNING PROGRAH. #TIC TAC 

TONE BATRIX GENERATION. #TBELVE - 

TCCL CONTROL. ♦ POST PROCESSOR CONCEPTS FOB* 
TOOL FOR PLANNING RADIAL DISTRIBUTION* 
TOURBAHENT. #A COHPUTER PROGRAH TO* 
TOBEB DESIGN. iTRABSHISSIOB 

TRACE AND THIRD ORDER ABERRATIONS. #GEBERAL* 
TRACE PROGRAM FOR THE IBB COHPUTER. ♦DYNAMIC 
TRACE PROGRAH. #GEBERAL RAY 

TRACE PROGRAH. tGENERAL 1620 

TRACE. iSELECTIVE 

TRAFFIC SIGNALS FOR AXIHAL ANDBITH. 
TRAFFIC SIGNALS. #THE SELECTION OF A CYCLE* 
TRANS. tLAEHA 

TRANSFER FUNCTIONS. ((CALCULATION CF POLES* 
TRANSFER. #DEFT - DISK EXECUTION OF FORTRAN 
TRABSFORB. ♦INVERSE LAPLACE 

TRANSFORBATION. ♦BOOLEAN FUBCTIOB 

TRABSFORHATIONAL REGRESSION ANALYSIS* 

#TRANSFORHATIONS TO CHECK AND INCREASE* 
TRANSFORHATIONS. (MEETING ASSUMPTIONS OF* 
TRANSFCRHER LOSSES. (EVALUATION OF PONER 

♦TRANSFORMER RATING FOR NORHAL AND EMERGENCY* 

#TRABSFORHEE RATIHG FOR HOHMAI AND EMERGENCY* 

tTRANSFORHER EATINGS BASED ON LOSS CF LIFE* 
TRABSFOBHERS BASED OB LOSS OF IIFE AND* 
TRABSIEBT OB STEADY HEAT COBDUCTION. ♦H-104,* 

♦TRANSIENT STABILITY FOB TEN BACHINES. 
TRABSLATIOB. ♦ELEMENTARY GERBAN-TO-BBGLISH 
TRANSLATION. ♦ELEMENTARY GERHAN-TO-EBGLISH 

♦TRANSMISSION LOSSES AND PENALTY FACTORS. 

♦TRANSMISSION FOHER DESIGN. 

♦TRANSMISSION TOBFR DESIGN. 
TRANSMIT - (TLUNBT) . #TABLE LOCKUP, NO* 

♦TRANSPORTATION PBOELEM. 

♦TRANSPORTATION PROGRAH FOR THE IBH 1620. 

♦TRAP - TRANSFORMATIONAL BEGBESSION ANALYSIS* 
TRAVERSE ANALYSIS PROGRAH (1628 - 40K) . 

♦TRAVERSE ANALYSIS PROGRAM. 
TRAVERSE AND CURVE DATA PROGRAH. ♦SES 

TRAVERSE AXIS. #SX-1.01 - 

TRAVERSE PROGRAH. ♦GENERAL SURVEY 

TRIANGULATION STRIP FORMATION - 6431. ♦AERIAL 
TRIANGULATION STRIP 6432 + 6433. 

♦TRIGNET - 6H09, 6420, 6421, 6423, 6424, 6125. 
TRODELE ANALYSIS. ♦ELECTRIC 

TRUSS ANALYSIS. ♦DETERHINATE 

♦TRUTH TABLES FOR SYMBOLIC LOGIC STATEMENTS. 
TUBE - TYPE. ♦AUTOSPOT POST - PROCESSOR FOR* 

♦TURBINE CYCLE HEAT BALANCE. 
TURRET DRILL BITS STEPPING SBITCB CONTROL. 

♦TBELVE - TONE MATRIX GENERATION. 

♦TSIN BOX CULVERT DESIGN. 

♦TBO-DIMENSIONAL ABSORPTION CORRECTION IN* 

♦TBO-DIHENSIONAL ABSORPTION CORRECTION IN* 
TBO-BIBEBSIOBAI, TRABSIEBT OR STEADY HEAT* 
THO-FACTCR FACTORIAL. 4ANALYSIS OF VARIANCE - 
TBO-FACTOR FACTORIAL. ♦ANALYSIS OF* 
TBO-FACTOR FACTORIAL. ♦ANALYSIS OF* 

♦TBO-IB-ONE LEAST SQUARES PROGRAH. 
TBO-SAHPLE TEST. ♦BILCOXON 

TBO-BAY ANALYSIS OF VARIANCE BITH N* 

♦TYGO - TYEE-ABD-GO SYHBOIIC PROGRAHHING* 
TYPE POLYNCBIAL CURVE FITTING BY LEAST* 
TYPE. ♦AUTOSPOT POST - PROCESSOR FOR* 
TYPE-AND-GO SYMBOLIC PROGRAHHING SYSTEM. 
UCRBL 51. #UCRBL 54-ANALYSIS OF VARIANCE* 
UMTS. ♦UNIVERSITY OF MISSISSIPPI TEST* 

♦UNCORRILATID AND CORRELATED PCIINOMIAL* 
UNEQUAL OR EQUAL N. ♦ANALYSIS OF VARIANCE,* 
UNEQUAL SUBCLASS FBEQUENCIES-UCRBL63. 
UNEQUAL SUBCLASS NUMBERS. ♦NESTED ANALYSIS* 
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TITLE 
UNEQUAL SUBSET CELL FREQUENCY. ♦ 1 TO 4 BAY* 
UNIT CELL CONTENTS. ♦CALCULATION OF HINERAL 
♦UNIVERSAL CALENDAR. 

UNIVERSAL FUNCTION FITTER. ♦SIXTEEN-TBEBTY 
♦UNIVERSAL OUTPUT SUBROUTINE. 

UNIVERSITY NONPARABETRIC TESTS. ♦HUNT -+ 
♦UNIVERSITY OF HISSISSIPPI TEST SCORING* 
♦UNIVERSITY OF HISSISSIPPI TEST SCORING* 
UNIVERSITY TEST SCORING PROGRAH. 
UNIVERSITY. ^1620 SPS ASSEBBLER BY RICE 
UNPACKING OPTION. ♦FIVE CHOICE SPLIT-HALF* 
UNPACKING. ♦SPS 

USU 10. ♦COVARIANCE ANALYSIS - RANDOMIZED* 
USU 12. ♦ANALYSIS OF VARIANCE - REPEATED* 
USU 15, 16. tBODEL BUILDING IN MULTIPLE* 
USU 22. ♦TBO BAY INDEPENDENCE CHI-SQUARE* 
USU 29. ♦COVARIANCE ANALYSIS - COMPLETELY* 
USU 31. ♦ANALYSIS OF VARIANCE-REPEATED LATIN* 
USU 32. ♦HOHOGENEITY OF VARIANCE TEST AND T+ 
USU 51. ♦ANALYSIS OF VARIANCE - RECTANGULAR* 
USU 52. ♦ANALYSIS OF VARIANCE - PARTIALLY* 
USU-II. ♦DIGIT COUNTING 

UTILITY PACKAGE. ♦DISK IOCS ROUTINES,* 
♦UTO FORTRAN PROCESSOR AND SUBROUTINES. 
VALIDITY OF A CATEGORIAL SYLLOGISH. ♦A* 
VALUE PROBLEB INVOLVING ONE FIRST ORDER* 
VALUE PROBLEM INVOLVING ONE FIRST ORDER* 
VALUES. #SIHULTANEOUS EQUATION SOLUTION AND* 
VALUES, FOR P LEVELS OF . 10 ,.01, .005. 
VAN LAAR CONSTANTS AND VAPOR LIQUID* 
VAPOR LIQUID EQUILIBRIUH FBCH AZEOTROPE+ 
VAPOR PRESSURE DATA BY THE ANTOINE EQUATION. 
♦VARIABLE ALPHAMERIC FORMAT PLOT RELOCATABLE* 
♦VARIABLE FIELD SQUARE ROOT SUBROUTINE. 
♦VARIABLE FORMAT CORRELATION PROGRAM. 
♦VARIABLE FORMAT T TEST MEAN AND STANDARD* 
VARIABLE PRECISION MATRIX INVERSION PACKAGE. 
VARIABLE PRECISION SERIES APPROXIMATION TO* 
VARIABLE. ♦CALCULATION OF THE REAL ROOTS OF* 
VARIABLES LINEAR EQUATIONS. ♦CALCULATION OF* 
VARIABLES. ♦CORRELATIONS OF ALL PAIR BISE* 
VARIABLES. ♦SOLUTION OF B REAL LINEAR* 
VARIABLES. MEST FOR NORBALITY BITH* 
VARIANCE (FACTORIAL DESIGN BITH NESTING* 
VARIANCE (ONE FACTOR). ♦ANALYSIS OF 

VARIANCE (SPLIT PLOT FACTORIAL) . ♦ANALYSIS OF 
VARIANCE - BALANCED LATTICE DESIGN. 
VARIANCE - FOUR-FACTOR FACTORIAL. ♦ABALYSIS 
VARIANCE - FOUR-FACTCR FACTORIAL. tANALYSIS 
VARIANCE - PARTIALLY BALANCED LATTICE - USU* 
VARIANCE - RECTANGULAR LATTICE DESIGN USU* 
VARIANCE - REPEATED RANDOBIZED BLOCKS USU* 
VARIANCE - THREE-FACTOR FACTORIAL. ♦ANALYSIS* 
VARIANCE - TBO-FACTCR FACTORIAL. ♦ANALYSIS OF 
VARIANCE - UNEQUAL SUBCLASS* 

VARIANCE AND COVARIANCE. ♦ANALYSIS OF 

VARIANCE AND COVARIANCE. ♦FACTORIAL ANALYSIS* 
VARIANCE AND COVARIANCE-UNEQUAL SUBCLASS* 
VARIANCE BY ROBS ABD COLUHBS. ♦BEAN,* 
VARIANCE COBPLETELY RANDOBIZED DESIGN-USU62. 
VARIANCE FOR UNEQUAL SUBCLASS RUBBERS. 
VARIANCE OF CHI SQUARE, BHEN EXPECTATIONS* 
VARIANCE RANDOHIZED ELOCK DESIGN-USU 63. 
VARIANCE RANDOHIZED COHPLETE BLOCK DESIGN,* 
VARIANCE SPLIT-SPLIT-PIOT DESIGN. ♦ANALYSIS 
VARIANCE SYSTEB. ♦GENERAL PURPOSE ANALYSIS OF 
VARIANCE TEST AND T TEST USU 32. 
VARIANCE BITH N OBSERVATIONS PER CELL 
VARIANCE BITH REPEATED HEASURES AND UNEQUAL* 
VARIANCE BITH T-TEST OPTION. ISIHPLE* 
VARIANCE. ♦ANALYSIS OF 

VARIANCE. ♦HOMOGENEITY OF 

VARIANCE. ♦ONE PASS ANALYSIS OF 

VARIANCE. #FACTORIAL ANALYSIS OF 

VARIANCE. ♦SPLIT PLOT ANALYSIS OF 

VARIANCE. ♦MEAN STANDARD DEVIATION AND 
VARIANCE. ♦ONE/TBO/THREE BAY ANALYSIS OF 
VARIANCE. ♦BARTLETTS TEST FOR HOMOGENEITY OP 
VARIANCE. ♦THREE FACTOR FACTORIAL ANALYSIS OF 
VARIANCE, CROSS-OVER DESIGN. ♦ANALYSIS OF 
VARIANCE, MEANS, AND SDS FOR SUBGROUPS BITH* 
VARIANCE, NONLINEAR DATA TRANSFORHATIONS. 
VARIANCE, RANDOBIZED COHPLETE BLOCK DESIGN,* 
VARIANCE, SPLIT-PLOT FACTORIAL DESIGN. 
VARIANCE-REPEATED LATIN SQUARES USU 31. 
VARIATE DIFFERENCE PROGRAM. ♦AN SPS 

♦VARIBAX BATRIX ROTATION. 

♦VECTOR COMPOSITION AND DECOMPOSITION. 

♦VEHICLE SIMULATION AND OPERATING COST SYSTEM. 

♦VERTICAL ALIGNMENT AND STAKEOUT. 
VIBRATING BEAM. ♦NATURAL FREQUENCIES AND* 
VIBRATION CALCULATIONS EASED ON* 

♦VIGNETTED APERATURE AND SPOT DIAGRAM* 
VIRTUAL WORK ANALYSIS OF STRUCTURES. ♦GENERAL 

♦VIRTUOSO - THE MUSIC PROGRAM TO END ALL* 

♦VOLTAGE PROFILE AND FAULT CURRENT* 
VOLUME. ♦COAL PILE 

♦VOLUMETRIC QUANTITIES PROGRAM. 
B/FORMAT. ♦FORCOM SUBROUTINES FOR FORTRAN 

♦BATEE FLOB IN A PIPE NETBORK BY HARDY CROSS* 

♦BATER HAMMER. 
HATER NETHORKS. ♦PRESSURE AND FLOB BATES IN* 
HATER PROPERTIES AND EFFICIENCY PROGRAM. 
HATES SUPPLY ENGINEERING USING THE DARCY* 

♦HATER SURFACE PROFILE SAN2-X. 

♦HATER HAY COMPUTATIONS PROGRAM. 
HAY ANALYSIS OF VARIANCE BITH REPEATED* 
BAY ANALYSIS OF VARIANCE. ♦ONE/THC/THBEE 
BAY COMPUTATIONS PROGRAM. ♦BATER 

HAY INDEPEBDENCE CHI-SQUARE ANALYSIS, COUNT* 
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TITLE PROGRAM NO. PAGE 

BAY IBDEPEBDEBCE CBI-SO.OABE ABALYSIS, COOBT* 1620-06.0.882 050 
MEEK - BEEKLY SCHEDULE OSIBG BASTEB SCHEDULE. 1620-10.3.010 115 
BEEKLY SCHEDULE OSIBG BISTEE SCHEDD1E. #SEEK 1620-10.3.040 115 
♦HBEKLY SCHEDOLIBG OSIBG BASTEB SCHEDDLE. 
•HEIBOLL ABALYSIS PACKAGE. 
•HEIGBTS PEOGBAH. 

BEIGBTS. tCOBPOTATIOH OF THE CAHOBICAL* 
#HELDED STEEL CCBPOSITE BEAB DESIGN. 

BESTEBN CAROLINA COLLEGE. #ADTCBATIC DATA* 
#«ILCOXOB TBO-SAHELE TEST. 

SILDEB 8/8/61. #»OB-LIBEAB PATCH FOR* 
#«ISAL PBOCESSOB FOB COBPOTEE ACCCUNTING CASE. 1620-02.0.058 036 
BISE COBBISATIOBS OF TWO SETS OF VABIABLES. 1620-06.0.217 068 
#«ITRAS - A LOAD ABD GO FOBTBAB SYSTEB. 1620-02.0.017 031 

WORK ABALYSIS OF STEOCTORES. »GENEBAL VIBTOAI 1620-09.2.011 086 
»OBK AEIA. tPOBTBAH II-D DISK SOBROOTINES TO* 1620-01.6.151 029 
SBIT. #BELOCATABLE SOBEOOTINES ABS, DEF, 1620-07.0.053 079 
HEITE IB OTHEB THAH THE HOBK AEEA. #FOBTBAN* 1620-01.6.151 029 
HBITTEB IB POBTBAN. #BA»H-«BITBEI D TEST 1620-06.0.058 018 

X-EAY CHISTALLCGBAPHY. iGEBEBAI THREE* .-__-..-- 

X-RAY CRYSTALLOGRAPHY. . tGEBEBAL TBO+ 
X-RAY CRYSTALLOGRAPHY. #IHTEB ASD* 
X-BAY CBYSTALLOGBAPHY.~#STHOCTORE FACTOR* 
XCIX. #COBTI»OOOS BEAH SEEIES - FRCGRAHS I* 
ZEROES. *EITTI»G DISTRIBOTIORS BITH THE* 
ZEROS OF ABPLIFIEBS TBABSFEB FOBCTIOBS. 
♦ZIP - KEYBOED IB COBTEXT ABALYSIS OB A* 
10. #COVARIAHC£ ABALYSIS - BABDCHIZED BLOCK* 
12. *ASALYSIS OF VABIASCE - BEPEATED* 
1230 OPTICAL BARK SCOEIBG READER OUTPOT. 
1101-1620. tHODOLAB IBVEBTOEY BANAGEBENT+ 
#111 DATA PEOCESSIBG SYSTEH - A» EDUCATIONAL* 
#111 DATA PEOCESSIBG SYSTEB - AB EDUCATIONAL* 
#111 DATA PEOCESSIBG SYSTEB - AB EDUCATIONAL* 
#111 DATA PBOCESSOB SYSTEB - AB EDUCATIONAL* 
•1113 PBIBTEB 
#1113 PBIBTEB 



1620-10.3.013 116 

1620-06.0.078 050 

1620-06.0.211 072 

1620-06.0.178 063 

1620-09.2.079 096 

1620-01.6.117 021 

1620-06.0.219 068 

1620-06.0.011 013 



1620-08.1.006 081 
1620-08.1.005 081 
1620-08.1.008 084 
1620-08.1.001 081 
1620-09.2.053 093 
1620-06.0.246 073 
1620-09.1.057 105 
1620-10.3.032 114 
1620-06.0.107 054 
1620-06.0.087 051 
1620-06.0.220 068 
1620-CS-04X 002 
1620-13.0.015 127 
1620-13.0.016 127 
1620-13.0.017 128 
1620-13.0.018 128 
#80 BE FOE 1620-06.0.222 069 
#80 DE FOB 1620-06.0.221 068 



1620-06.0.084 051 
1620-11.0.011 123 
1620-06.0.081 051 
1620-07.0.037 077 
1620-02.0.050 834 
881 

1620-CB-07X 001 
1620-01.6.104 023 
1620-CO-04X 002 
1628-FB-029 088 
1620-PR-038 
1620-SB-047 
1620-FO-037 
1620-LB-010 
1620-PH-845 
1628-PE-033 
1620-SP-035 
1620-SP-020 
1620-LB-010 
1620-LH-039 



009 

005 



009 
811 
018 



006 
087 



1143 PBIBTEB. tTABOLATE BOBEBIC DATA DECKS OB 1620-13.0.031 129 

15, 16. #HCDEL BOILCIBG IB B0LTIPLE+ 
1585 to 2599 A.D.. JGREGORIAB CALEBDAB 

16. #BODEL BUILDIBG IB BOLTIPLE REGRESSIOB+ 
1620-FO-037. #EESSEL EDUCTION SOBBOOTINES+ 
1628-1443 BOSITOE I VEESIOB 2. #BACRC* 

#1620/1311 SD-AET SOIIERICAL CCNTRCL PBOCESSOB. 1620-CB-06X 

#1628/1311 ADTOSPOT III BOBEBICAL COBTBOL* .*->«-™-«-" 

#1620/1311 DISK PACK COPY PBOGRAH. 

#1620/1311 LIBEAE PEOGBABBIBG SYSTEB. 

#1620/1311 BOBITOE II (CAED) . 

#1620/1311 BOBITOE II (TAPE). 

#1620/1311 SOET-BEBGE (CABD) . 

#1620/1443 FOBTBAB BITB FOBBAT (CABD). 

#1620/1443 FOBTBAB BITH FOEBAT - 1627 PLOTTEB 

#1620/1443 BOBITOE II (CABD). 

#1620/1113 BOBITOE 1 (CABD). 

#1620/1113 SPS III (CABD). 

#1620/1710 SPS (CAED). 
1627 PLOTTEB SDBROOTIBE. #1620/1143 FOETHAN+ 
1627 PLOTTEB SOBEODTIBE, PBOGBAB (CABD). 

1627 PLOTTEB SOBEODTIBES (CAED) . #BOBITOB II* 1628-LH-050 
1627 PLOTTEB SOEBOOTIHES PBOGBAB (CABDS) . 1620-LB-041 806 
1627 PLOTTEB SOBEODTIBES, PBOGBAB (CABD). 1620-LH-842 887 
19X19 BISSIBG DATA ABD 10110 BEAU, SD ABD* 1620-86.0.212 072 
#19X19 BISSIBG DATA. 1620-06.0.2M 872 

2K-1 COHPAEISONS. #BEST K OF 1628-06.0.223 069 

2X2 TABLE. tFISHEBS EXACT PROBABILITY FOE A 1620-06.0.850 017 
22. #T»0 HAY IBDEPEBDEBCE CHI-SQOARE* 1620-86.0.082 858 

24-HOOB LOAD CYCLE. #OVEBLCAD EJTIBGS OF 65* 1628-09.4.060 185 
24-H00B LOAD CYCLB. #TEABSFOEHEE BATIBGS* 1620-09.4.032 182 
2599 A.D.. #GBEGOBIAB CALEBDAB - 1585 to 1620-11.0.041 123 

31. #ABALISIS OF YABIABCE-BEPEATED LATIB* 1628-06.0.886 851 

32. #HOBOGE»EITY OF VABIASCE TEST ABD T TEST* 1628-06.0.081 058 
110-110. tCOBBELATION 1620-06.8.015 044 

#40X40BEA» STABDABD DEVIATION ABD* 1620-06.0.239 072 

40X40 BEAH, SE ABD INTEBCOBRELATION. #T-TEST* 1620-06.0.242 072 
,02 #CCEES DDHP 1620-01.6.820 018 

51."#AHALYSIS OF VABIASCE - BECTABGOLAB* 1620-06.0.083 051 
52. #ANALYSIS OF VABIASCE - PARTIALLY* 1620-06.0.105 054 

54. #OCSBL 54-ABALYSIS OF VAEIABCE* 1620-06.0.088 851 

54-ANAIYSIS OF VABIARCE* 1628-06.0.888 051 

565 PLOTTEB SUBROUTINE PES BOB FOBTBAB* 1620-13.0.005 126 

#6-61 IOBBO/FOBTRAH OF EOLLA BISSCOBI. 1628-02.0.816 831 

63. ♦BULTIVABIJTE ABALYSIS OF VARIANCE* 1620-06.0.139 058 
6409 6128, 6421, 6423, 6121, 6125. #TEIGBET 1620-09.2.817 092 
6431. #AEBIAL TRIARGOLATIOB STRIP FOEBATICB - 1620-09.2.848 892 



6132 ♦ 6133. #OHCOREELATED ABD COEEELATEL+ 
7010/7011 OB THE IBB 1620. JSIBOLATIOS OF* 
7894 FAP (FOB THE IBB 1620 DIGITAL* 
8/8/61. #BOB-LIBEAB PATCB FOB BOLTIPLE* 
#80-SEEIES BOLTIPLE LIBEAE EEGBESSIOB SYSTEH. 
80-80 LISTIBG. #AFIT SYBBOLIC PEOGBABBIBG* 



1620-09.2.049 092 
1620-82.0.037 033 
1620-02.0.030 032 
1620-06.8.011 013 
1620-06.0.113 059 
1620-01.1.027 011 
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1620-CA-02X 
SIXTEEN. 



iTHenty universal function FITTER 



DESCRIPTION - The Sixteen-Twenty Universal Function Fitter 
Program is a complex linear and non-linear regression 
analysis or generalized function fitting routine for the 
1620 (Hodel 1 or 2)-1311 combination. With this program, 
it is possible to fit a set of data points to any algebraic 
function whose coefficients of regression are linear. 

FEATURES - 

- Algebraic specification of model. 

- vide range of models. 

- Output in the form of regression coefficients plus a 
complete set of statistical measures, including 
plotback. 

- Adjustable mantissa in floating point fields. 

- Simplified preparation of input data. 

- Size of model expandable with memory. 

- Program stored on disk file. 

The entire program, stored on the 1311 Disk Storage Drive, 
is comprised of nine phases. Each phase is self-contained 
and, at its conclusion, locates the next phase, which is 
then read into core memory. The program is not constructed 
to allow for thousands or even hundreds of variables- on the 
contrary, its main intent is to extend the complexity of the 
function which it is required to fit. 

MINIMUM SYSTEM REQUIREMENTS - A 20K 1620 system with. ..1622 
Card Bead Punch. ..1311 Disk Storage Drive. ..and if a 1620 
is a Model 1, Indirect Addressing special feature. 
Optional-«0K or 60K storage... Automatic Floating Point... and 
if 1620 is a Model 1, Direct Divide special feature. 

BASIC FKOGEAH PACKAGE 

DOCUMENTATION - Program write-up. . .Listings. 
MACHINE READABLE - Object code. .. Source code. 

OPTIONAL PROGRAM PACKAGE - None. 

OBDEBING INFOBMATION: PBOGBAM NUMBER 1620CA02X 

PROGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



CONTINUED FROM PRIOR COLUMN 

Storage Model 1 with 20K storage... and a 1622 Card Bead 
Punch and one 1311 Disk Storage Drive Model 3. In addition, 
most post processor programs will require some method of 
producing 8 Channel Punched Tape output. Either the 1902 
Model 23 or 1902 Model 21 Tape Punch (BPQ) may be used 
on-line for tape punching. These units are attached to 
the system through the 1999 Model 5 Punch Independent 
Attachment (BPQ) and feature No. 5520 or No. 5521 Tape 
Unit Adapter. Your customer may also want to take advantage 
of the 1627 Plotter for visual verification of his part 
programs. Contact your regional special equipment 
department for further information. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up. Reference Manuals, listings. 
MACHINE READABLE - Object code. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Source code. 

ORDERING INFOBMATION: PROGRAM NUHBEB 1620CN06X 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTB* 
CABDS 



USES VOLUME 
REQUIREMENT 



none 
none 



BASIC none 
OPTIONAL none 



DTB* 
none 



none 
none 



1620-CN-05X 

AUTCSPOT PROGRAM 

DESCRIPTION - The Basic Autospot program is for point-to- 
point machining for drilling, tapping, reaming, and boring. 
The program includes - English language specifications for 
greater clarity and accuracy. Flexible instructions 
allowing for pattern definitions, translations, rotations, 
and inversions. Validity checks of the source statement to 
insure internal consistency. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 system with 20,000 
positions of storage. Indirect Addressing, Automatic Divide, 
and card input/output. 

BASIC EROGRAM PACKAGE 

DOCUBEHTATION - Srite-up. 

HACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - Hone. 

ORDERING INFOBMATION: PROGRAM NUMBER 1620CN05X 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USES VOLUME 
REQUIREMENT 



1620-CH-07X *5 

1620/1311 AUTOSPOT III NUM ERI CAL CONTROL PROCESSOR 

DESCRIPTION - This program provides a fast, flexible, and 
efficient problem solving tool to aid numeric controlled 
machine tool users. AUTOSPOT III offers the low cost 
computer user a significant advancement in numerical control 
program processing. AUTOSPOT III assists the user in the 
preparation of tapes for numerically controlled machine 
tools. Input statements are English-like and conform to 
common machine-shop terminology. AUTOSPOT III is primarily 
a point-to-point language most useful in generating 
locations of holes to be drilled, tapped, reamed, etc. 
Routines are included for easily specifying a series of 
straight line or circular incremental points and for 
translating, rotating, inverting, or patterns of points. 
Milling capabilities allow straight Reversing patterns 
of points. Milling capabilities allow straight line and 
circular paths to be defined, with special routines for 
offset milling, face milling, and filleting. 

FEATUBES- 

- AUTOSPOT III is written is SPS-II-D and operates under 
control of the 1620 Monitor I System. 

- Special machine tool functions may be defined through 
reserved commands. 

- Ability to go directly from source statements to final 
output in one pass. 

- Ability to define points, lines and circles geometrically 
to facilitate point definition. 

- Ability to define patterns of points, perform multiple 
transformations and manipulations on these patterns 
and collect groups of patterns into higher level 
patterns for further transformation and manipulation. 

- The user has the facility to adapt AUTOSPOT III for use 
with plotting or drafting devices. 

- Intersection and tangency points of various curves are 
calculated relieving the parts programmer of this task. 

- Source language input may be from cards, typewritter, 
or paper tape. 

For customers using AUTOSPOT II, the addition of the 1311 
Disk storage Drive utilized by AUTOSPOT III provides many 
advantages- 

- Removes restriction on number of points in a pattern. 

- Removes restriction on number of pattern levels. 

- Provides the ability to accept any point (s) in an 
incremental statement or previously defined pattern. 



1620ZCN306X *M 

J620^13_U AD-APT NUMERICAL CONTROL PROCESSOR 

DESCRIPTION - AD- APT is a numerical control processor for 
contouring type machine tools. It uses English-like words 
to describe a wide operations- The output from AD-APT 
may be stored on the 1311 Disk Storage Drive for conversion 
by the customer post processing programs for most types 
of numerically controlled machine tools or plotted output. 
Range of two-dimensional and limited Three-dimensional 
machining. 

MINIMUM SYSTEM REQUIREMENTS - Either a 20K 1620 Model 1 
with these features - Additional Instructions (TNS, TNF, 
MF) , Automatic Divide, Automatic Floating Point operations. 
Card Read Punch Adapter, Disk Storage Drive Adapter, and 
Indirect Addressing... or a 1620 Model 2 with these special 
features- Automatic Floating Point operations. Card Read 
Punch Adapter, Disk Storage Drive Adapter, and a 1625 Core 



For the prospective user of computer programming for N/C 
tools, AUTOSOPT III offers new depth and power previously 
unattainable in a Point-To-Point language. 

MINIMUM SYSTEM REQUIREMENTS - Either 20K 1620 Model 1 with 
Adapter, Disk Storage, Drive Adapter, and Indirect 
Addressing... 1622 Card Read Punch Model 1... 1311 Disk 
Storage Drives Model 3... 

OB 

20K 1620 Model 2 with Card Bead Punch Adapter and Disk 
Storage Drive Adapter... 1625 Core Storage Model 1 — 
1622 Card Read Punch Model 2... 1311 Disk Storage Drive 
Model 3. 

NOTE - Most N/C machine tool users will require tape 
punching facilities for preparing 8-channel tape. 
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BASIC PROGRAM PACKAGE 

DOCUMENTATION - Application Description, H20-0178... 
Part Programmers Manual, H20-0200... Operators Manual, 
H20-0201... Systems Manual. 
MACHINE BEADABLE - Object code... San pie problem. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE BEADABLE - Source code. 

OBDEBING INFORMATION: PBOGEAM NUMBER 1620CN07X 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TTPE CODE 



DTR* 
DTR* 



USER VOLUME 
REQUIREMENT 



none 
none 



1620-CO-0UX *H 

1620/1311 LINEAR PROGRAMMING SYSTEM 

DESCRIPTION - Linear programming adds a new dimension to 
the IBM 1620. The 1311 Disk Storage Drive, combined with 
this tailored and sophisticated Linear Programming Systems, 
means the scope of applications is large - production 
allocation, blending, distribution ana shipping, production 
and planning, market research, material handling, and many 
more. 

The IBM 1620/1311 LP System is composed of a number of 
programs which are stored on the disks. The programs are 
called by procedure control cards known as Agendum cards. 
The seguence of Agendum cards defines the solution precedure 
by forming the processing agenda for an application. 

Linear Programming is a mathematical technigue for c-ptimum 
resource allocation. The resources (capital, raw materials, 
manpower, etc.) are allocated to specified activities 
{investments, products, jobs, etc.) to obtain a particular 

objective (maximum profit, minimum cost, etc. ) . 

FEATURES - The minimum system configuration will handle 
100 rows including primary and alternate objective 
functions, and 1,000 column including primary and alternate 
right-hand sides. Flexible, powerful procedure control 
statements tailor input, solution and output processing 
as required for an application. Input data originates 
from cards, and may be stored and maintained on disk for 
subsequent reprocessing due to price or requirement changes. 
Multiple problems may be defined from a single data source 
by selecting subsets of a master data file. Columns 
(variables and right-hand sides) and rows (constraints 
and objective functions) are referenced by name. Input 
data card format (SHARE) is compatible with other linear 
programming systems. Advanced mathematical methods increase 
accuracy and processing speeds - dual and primal revised 
simplex, bounded variable, user or automatic assignment 
and variation of inversion frequency and floating point 
lenqth. Extensive output reports may be selected by the 
user. These include solution levels, reduced costs and 
marginal values, cost ranges, etc. Any output report may 
be subdivided into meaningful groups to simplify data 
analysis and distribution. The output unit is specified 
by the user. Check of solution accuracy. 

PROGRAMMING SYSTEMS - Operates under the control of 1620 
Monitor I (1620-PR-025) . 

MINIMUM SYSTEM REQUIREMENTS - A 20K 1620 System Model 1 
or 2 with one 1311 Disk Storage Drive... 1622 Card Read 
Punch... Indirect Addressing, Automatic Divide, and 
Additional Instructions. Additional core storage increases 
problem capacity up to tt00 rows by 3,000 columns for 60,000 
digits of core (these larger problems may require one or 
more additional disk storage drives) . The Automatic 
Floating Point operations are optional and will decrease 
processing time. The on-line printer may be utilized as 
an optional output device. Only one - and two-disk 
operation is supported by this release, (Version I, Mod 
0). A two disk system has solved a 400 row problem. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Application Directory. . . Application 

Description... Reference Manual. 
MACHINE READABLE - Object code... Sample problem. 

OPTICHAL PROGRAM PACKAGE 

DOCUMENTATION - Manual with listings. 
MACHINE READABLE - Source code. 



Jiza^cs^enx *H 

CAPITAL INV ESTMENT 

DESCRIPTION - The program is designed to accept various 
input parameters and data, and from this, compute tables 
of depreciation and salvage values, earnings, and interest 
payments. From these tables, a stream of cash flow is 
generated and this, in turn, is used to compute a table 
of rates of return. The program used the augmented 
investors method of predicting the expected value of the 
rate of return. To do so, it employs the following 
concepts; Cash Flow, Time Value of Money, Probability 
Distribution of Economic Life. These three concepts enable 
the data processing system to take all the economic factors 
of a wide variety of capital investment proposals and 
relate them to a reliable standard of economic worth. 
Application of this program may be applied to future 
projects to prove the feasibility of including them in 
the capital investment budget. It may be used to select 
the particular machine, process, etc., before the contract 
is let or the production order is released. 

minimum system REQUIREMENTS - 1620 computer with K0K memory 

and card input and output. The Automatic Divide feature 

is necessary if the FORTRAN II Processor is used. The 

program will also assemble, using FORTRAN with Format for 
card systems. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program Write-up. 

MACHINE BEADABLE - FORTRAN source decks... FORTRAN 
object decks with subroutines... Sample problem deck. 

OPTIONAL PROGRAM PACKAGE - None. 



ORDERING INFORMATION: PROGRAM NUMBER 1620CS01X 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



J620 = CS = 0UX *« 

MODULAR INVENTORY MANAGEMENT SIMU LATOR - 1 620 VERSION FOR 
1M!zI620 

DESCRIPTION - A Modular Inventory Management Simulator 
to provide pre-testing of inventory control system. 

PROGRAMMING SYSTEMS - Written in FORTRAN; designed for 
ease of understanding, ease of modification. 

MINIMUM SYSTEM REQUIREMENTS - Card system, memory 20K, 
and no special features required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up... Listings. 
MACHINE READABLE - Object code... Source code. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620CS04X 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



ORDERING INFORMATION: PROGRAM NUMBER 1620CO04X 



DISTRIBUTION MEDIUM 
CODE 



Basic 


PHOGB&I N01 
EXTENSION 

none 


1BEB 


distr: 

TYPE 
DTE* 


OPTIONAL 


none 




CSP.DS 



USER VOLUME 
REQUIREMENT 



none 

none 



1620rCSzl6X 

FINANCIAL EVALUATION PROGRAM 



DESCRIPTION - The Financial Evaluation Program provides 
a computerized method for performing economic evaluations. 
The program, which is structured on the discounted cash 
flow method, provides a tool for the realistic evaluation 
of capital investment and associated investment expenses 
by considering tax impact, inventory carrying costs and 
turnover rates, manpower dollars, income, etc. Program 
flexibility is achieved by using control card input of 
the constants reguired in the evaluation. 

FEATURES - 

- Calculates total project costs. 

- Provides the yearly cash flows, either differential 
(in relative project analysis) or absolute (when only 
one project is being analyzed) , taking into account 
depreciation, state, federal and capital gains tax 
rates, and the time value of money. 

- Analyzes the cash flow and arrives at a rate of savings 
that represents the interest rate necessary to obtain the 
same cash flow incomes. 

- Calculates a payback period. 

This program is primarily a cost minimization model, and 
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as such provides a uniform financial treatment of all basic 
cost information related to the projects under 
consideration. It may also be used for profit maximization 
evaluations, as it recognizes and deals with primary, 
ancillary, and capital gains incomes. Project associated 
costs and incomes are generated by the analyst, ana nev 
input prepared for each nev evaluation. Information 
infrequently modified {i.e., man year dollar rates, 
investment tax lives, turnover rates, and tax rates) is 
maintained as constant input. The program output is a 
listing of the constant information and the results of 
the particular evaluation* 



1620 
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BASIC none DTR* 

OPTIONAL none DTR* 



none 
none 



PROGRAMMING SYSTEMS 
SP-020) . 



Written in IBM 1620/1710 SPS (1620- 



HIHIMOM SYSTEM REQUIREMENTS - A 20K 1620 eguipped with 
Auto Divide, Additional Instruction, Indirect Addressing, 
and 1622 Card Read/Punch. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Application Directory... Reference 
Manual... Systems Manual. 

MACHINE READABLE - Source code... Object code... 

Sample problem. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620CS16X 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620~CX-0frX *M 

DRAFTING SYSTEM 

DESCRIPTION - The IBM Drafting Processor converts statements 
describing the drawing into commands that operate the IBM 
1627 Plotter. The part can be described by a variety of 
two-dimensional geometric and arithmetic statements. 
Dimensions and notes may be placed on the drawing with 
the use of annotation statements. Logic, macros, program 
loops, and line class capabilities further enhance the 
set of statements to produce detail engineering drawings. 

FEATURES - 

- The first IBM Application Program designed to produce 
engineering drawings as computer output. 

- Provides an immediate link with numeric control, an 
important step in an engineering data processing system. 

- User can customize his own system by storing his 
sub-drawing routines on the file. 

- Converts language statements to drawings in one 
monitored job. 

- Rapid Processing is achieved by using the 1311 file for 
storage of data programs, 

- The system has the versatility to produce master grids, 
standard drawings, proposal drawings, chassis layouts, 
printed circuits, and pattern developments. 

- The annotation capabilities include a set of special 
sysmbols that conform to military drafting standards to 
aid the implementation of geometric and positional 
tolerance practices. 

Working from a layout drawing or an engineering sketch, 
the user prepares language statements that are input to 
the Drafting Processor. The Processor translates the 
language statements, performs the necessary computations, 
and controls the IBM 1627 Plotter to produce a detailed 
engineering drawing. 

PROGRAMMING SYSTEMS - Monitor I (1620-PH-025) , Version 1, 
Level 9. 

MINIMUM SYSTEM REQUIREMENTS - A 20K 1620 system with paper 
tape adapter, disk storage drive adapter, card read punch 
adapter, plotter control... 1622 Card Read Punch. ..One 
1311 Disk Storage Drive Model 3. ..1627 Plotter. If the 



ELECTRONIC CIRCUIT ANALYSIS PROGRAM 

DESCRIPTION - This programming system provides the 
electronics engineer with a powerful engineering tool to 
aid in the solution of an analysis and reliability problem 
prevalent in the electrical, electronics, and aerospace 
industries. It also provides sole justification for a 
1620 in companies largely engaged in electronics design. 

The program has the facility for AC, DC, or transient 
analysis of electronic circuits. The effect on circuit 
performance of tolerance variations and changes in component 
characteristics can be analyzed, allowing the engineer 
to obtain a final design of highly reliable circuits guickly 
and inexpensively. The engineer first develops a circuit 
eguivalent to the one he wants to analyze in which he 
replaces active elements with equivalent models composed 
of passive elements. He then uses a specially designed 
input language, which greatly facilitates the use of the 
program by non-computer oriented engineers, to describe 
the equivalent circuit and its physical characteristics. 
The system then automatically generates the circuit 
equations, relieving the engineer of this chore. Selective 
control over the analysis and output is retained by the 
engineer through simple input statements. Console 
intervention routines provide additional control over the 
program and allow for experimental modification of the 
circuit parameters. 

FEATURES - 

- Easy to use input language 

- Automatic generation of circuit equations. 

- Obtains designs of high reliability through ability to 
practically investigate many variations of the circuit 
design. 

- Allows experimental design at the console or automatic 
iterative solutions of final design. 

- Handles a circuit of up to 21 modes and 60 branches. 

- Non-linear transient analysis through linear 
approximations. 

- Worst case analysis of DC circuits. 

The input language is interpreted by a main line program 
which then calls in one of the three analysis programs 
as requested by the user through the input language. Input 
may be batched, thus performing a number of analyses that 
may or may not be related. 

PROGRAMMING SYSTEMS - Written in FORTRAN II-D, resides 
on the 1311 Disk Storage Drive, and operates under the 
1620 Monitor I System, (1620-PR-025) . 

MINIMUM SYSTEM REQUIREMENTS - A 40K 1620 System Model 1 
or 2 with... one 1311 Disk Storage Drive... 1622 Card Read 
Punch... Automatic Divide and Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up. .. Application 

Directory.. .Application Description. . . Users 

Manual. . .Operators Manual. 
MACHINE READABLE - Object code. .. Monitor 

control program. ..sample problem program. 

OPTIONAL PROGRAM PACKAGE 

DOCUMENTATION - Systems Manual. 
MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620EE02X 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
DTR* 



USER VOLUME 
REQUIREMENT 



none 
none 



system is a Model 1, Additional Instructions, 
Divide, and Indirect Addressing are needed. 



Automatic 



I620zEO;£1X 

GENERAL RAY TRACE AND THIRD ORDER ABERRATIONS 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up. . .Application 
Directory . . . Application Description. . . Users 
Manual. ..Operators Manual. ..System Manual. 

MACHINE READABLE - Object code. .. Sample problem. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620CX04X 



PROGRAM NUMBER 

EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 
REQUIREMENT 



DESCRIPTION - The lens design application is a simulation 
of the lens systems effects upon rays of light which enter 
such systems. A lens system is defined as an object 
surface, a succession of refracting and/or reflecting 
surfaces, and an image surface. The purpose of this 
application program is to assist the lens designer in 
designing lens systems, which meet the specifications, 
without laborious manual computations and extensive model 
building. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 system with a 20,000 
core memory, indirect Addressing and card input/output. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Listings. 



IBB PBOGEABS 
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BACHINE BEADABLE - object code. 
OPTIONAL PBOGBAB PACKAGE 

DOCUBBHTATION - Hone. 

BACHINE BEADABLE - Source code. 

OBDEBING INFOEBATION: PBOGBAB NUBBEB 1620EO01X 

PBOGBAB NUBBEB DISTBIBUTION BEDIUB USEE VOLUBE 
EXTENSION TYPE CODE BEQUIBEBENT 



BASIC none 
optional none 



DTB» 
DTB* 



none 
none 



i6 2etEOzJ3X iS 

VIGNETTED APEBATUEJ ME SJSI DIAGBAB PBOGEABS 

DESCBIPTION - This program computes the vignetted aperature 
of a lens system. The program aids constructs a grid 
across the area and traces rays through the system from 
the grid. Thus the lens designer can focus his attention 
on the total usable path of light through the system. 
The program mill handle - up to 999 spots traced per spot 
diagram, up to 29 surfaces, including up to 5 tenth order 
aspheric surfaces, or up to 31 surfaces if all conic 
sections. The vignetted aperature shape may be either 
specified by the designer or computed automatically. 

BIHIBOB SYSTEM BEQUIBEBENTS - A 1620 system with a 20,001 
position core memory. Indirect Addressing, and either card 
or paper tape input/output, (Paper tape systems must be 
at least E suffix models) . 

BASIC PBOGBAB PACKAGE 

DOCDBENTATION - Listings. 
BACHINE EEADABLE - Object code. 

OPTIOHAL PBOGEAH PACKAGE 
DOCUBENTATION - Bone. 
BACHINE EEADABLE - Source code. 

OBDEBIBG INFOBBATION: PBOGBAB NUBBEB 1620EO03X 

PBOGBAB NUBBEB DISTRIBUTION BEDIUB USEE VOLUBE 
EXTENSION TIPE CODE EEQDIBEBE8T 



BASIC none 
OPTIONAL none 



DTE* 
DTE* 



none 
none 



BADIAL ENEEG! DISTBIBUTION AND EOCOS SBIFT COMPUTATIONS 
PBOGBAB 

DESCBIPTION - The program computes Badial Energy 
distribution from Spot Diagram input data. The program 
«ill handle up to 500 spots per energy distribution. The 
program has the ability to obtain chromatic energy 
distributions, specify obscurations, shift focus to 
arbitrary image position and surface shape. 

BINIBOB SYSTEB BEQOTBEBENTS - A 1620 system with a 20,000 
position core memory. Indirect Addressing, and either card 
or paper tape input/output. (Paper Tape systems must be 
at least E suffix models.) 

EASIC PBOGBAB PACKAGE 

DOCUMENTATION - Program write-up... Listings. 
MCHIHE EEADABLE - Appropriate material delivered. 

OPTIONAL PBOGBAB PACKAGE 
DOCUMENTATION - None. 
BACHIBE BEADABLE - Appropriate material delivered. 



OBDEBING INFOBBATION: PBOGBAB NUBBEB 1620EO05X 



CONTINUED EBOB PBIOB COLUBN 

who are not trained as programmers to prepare their problems 
for the 1620. For scientific and engineering computations 
where problems are usually expressed mathematical formulae, 
FOBTBAN is extremely useful. A source program written 
in the FOBTBAN Language is processed by the 1620 FOBTBAN 
with Format compiler (processor) to produce a 1620 machine- 
language object program, which is then loaded and executed. 
Input/output facilities contain provision for including 
fixed or variable alphabetic information in the typed or 
punched results. The appropriate set of floating point 
arithmetic and functional subroutines may be compiled with 
the object program or loaded with the compiled program 
prior to execution. Functional subroutines are selectively 
included as necessary. The precisions of Fixed point and 
Floating point Arithmetic are 4 and 8 decimal digits, 
respectively. Four sets of fixed length floating point 
subroutines are available, designed for four different 
1620 system features configurations. 

BINIBOB SYSTEB KEQOIBEBEBTS - For both compilation and 
execution, a 20K 1620 Bodel 1 or 2 with... 1622 Card 
Head/Punch or 1621 Paper Tape Reader and 1620 Tape Punch. 

BASIC PEOGBAB PACKAGE 

DOCUMENTATION - Program write-up... Listings... 
Flowcharts. 

SACHINE BEADABLE - Option 1 - Subroutines (with 
listings) for machines with the Automatic Divide 
feature; 1620 FOBTBAN with Format Processor, and is 
specified by using Program Number Extension 0PT1. 
Option 2 - Subroutines (with listings) for machines 
with the Automatic Floating Point Operations feature; 
1620 FOBTBAN with Format Processor, and is specified by 
using Program Number Extension 0PT2. Option 3 - 
Subroutines (with listings) for machines with the 
Automatic Floating Point Operations, additional 
instructions, and indirect addressing; 1620 FOBTBAB 
with Format Processor and is specified by using Program 
Number Extension 0PT3. Option 1 - Subroutines (with 
listings) for machines without the Automatic Divide 
Feature; 1620 FOBTBAN with Format Processor, and 
is specified by using Program Number Extension 
0PT4. 

OPTIONAL PBOGBAB PACKAGE 
DOCDBENTATION - None. 
BACBINE BEADABLE - Source code. 

OBDEBIBG INFOBBATION: PBOGBAB NUBBEB 1620FO00U 





PBOGBAB NUBBEB 
EXTENSION 


DISTEIBUTIOB 
TYPE 


BEDIUB 
CODE 


USER VOLDBE 
BEQUIBEBENT 


BASIC 


0PT1 




DTB» 




00 




none 




0PT2 




DTE* 




ei 




none 




0PT3 




DTB* 




00 




none 




OPTU 




DTE* 




00 




none 


OPTIONAL 


none 




BT 
BT 


7/556 
7/800 


22 
21 




01 
01 


1620-FO-006 

FOBTEAN 


PBE-COBPILEB 


iCABDl 








*B 



DESCBIPTION - This program detects and permits correction 
of errors in a FOBTBAN source program before the object 
program is compiled. The Pre-Conpiler detects many of 
the more common programming errors in individual source 
statements, and indicates possible logical errors in the 
source program as a whole. 



BIBIBUB SYSTEB BEQOIBEBENTS - 20,000 positions, 
1622 Card Eeader/Punch. 



1620 CPU, 



PBOGEAH NOBBEE 
EXTENSION 



EASIC none 
OPTIONAL none 



DISTEIBUTIOB BEDIUB 
TIPE CODE 



DTB* 
DTB* 



USEE VOLUBE 
BEQUIBEBENT 



none 
none 



BASIC PBOGBAB PACKAGE 

DOCUBENTATION - program write-up.. 

BACHINE EEADABLE - Object code. 



Listings. 



OPTIONAL PBOGBAB PACKAGE - None. 

OBDEBING INFOBBATION: PBOGEAH NUHBIE 1620FO006 



PBOGBAB NUBBEB 
EXTENSION 



DISTEIBUTIOB HEDIUB 
TYPE CODE 



USEE VOLUBE 
BEQUIBEBENT 



162fcFO r 00» ifl 

POBTBAJ »ITB FOBBAT - CABD 

DESCBIPTION - The new version incorporates the set of 
subroutines previously available as 1620 F/F-AFP 
subroutines. Bo. 1620-LB-022 (card) . It also provides 
a new set of subroutines designed specifically for 1620 
systems eguipped with the Automatic Floating Point 
operations. Additional Instructions, and Indirect Addressing 
features. The 1620 FOETBAB with Format system brings the 
advantages of the FOBTBAB language to 1620 users. The 
language of FOBTBAN closely resembles the language of 
mathematics. The similarity allows technical personnel 



OPTIONAL none 



1620-FO-019 

FOBTBAN II JCABD1 



DESCBIPTION - 1620 FOBTEAN II is an extension of 1620 
FOBTBAB and 1620 FOBTBAN with Format. It provides many 
additional features such as subroutine and function 
subprogram facility, provision for arithmetic statement 
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functions, ccmmon and equivalence statements, and complete 
flexibility in format specifications. Continuation cards, 
variable length precision in calculations, extensive 
diagnostic checks, and multiple compilation facility enhance 
the usability of the system. 

MINIMUM SYSTEM REQUIREMENTS - (1) For compilation - A 1620 
with 10,000 digits of storage, card read/punch. Indirect 
Addressing, and Automatic Divide features. The processor 
can be modified for 60,000 digits of storage to allow an 
extension of the symbol and name tables. (2) For execution, 
a 1620 with 40,000 digits of storage, card read/punch. 
Indirect Addressing, and Automatic Divide features. The 
processor can be modified to compile object programs for 
execution on 1620* s with 20,000 or 60,000 digits of storage. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION _ Program write-up... Reference Manual. 

MACHINE READABLE - Option 1 - Subroutines for systems 
without Automatic Floating Point and is specified by 
using Program Number Extension 0PT1. Option 2 - Sub- 
routines for systems with the Automatic Floating Point 
feature and is specified by using Program Number 
Extension OPT2. 

OPTIONAL PROGRAM PACKAGE 

DOCUMENTATION - Listings... Flowcharts. 
MACHINE READABLE - None. 



OSDEEISG INFORMATION: PROGRAM NUMBER 1620FO019 



PROGRAM NUMBER 
EXTENSION 



EASIC 0PT1 

0PT2 

OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 

D1R* 00 

DTR* 00 

none 



USER VOLUME 
REQUIREMENT 

none 

none 

none 



1620-FO-037 

1620/1413 FORTRAN WITH FORMAT (CARDj 



DESCRIPTION - The IBM 1620/1443 FORTRAN with Format, No. 
1620-FO-037 <card) , is a modification of IBM 1620 with 
Format. It uses the IBM 1443 Printer as an integral 
component in the compilation of source programs, and 
incorporates printer versions of the subroutine sets. 
1620-1443 Systems are thus provided with a convenient and 
relatively fast means of listing FORTRAN source programs 
and symbol tables, greater programming flexibility and 
faster throughput. 



Floating-Point and Fixed-point instructions from arithmetic 
statements, resulting in improved object program speed. 
The language specifications are the same as those of 1620 
FORTRAN II, Version 2, with the addition of two new 
statements for overflew and exponent check. They are- 

if (exponent check) HI, 112 

if (exponent check) N1, N2 

A source program written in FORTRAN Language is processed 
by the 1620 FORTRAN II for Automatic Floating Point Compiler 
to produce a 1620 machine language object program deck, 
which may then be loaded and executed. A set of arithmetic 
and functional subroutines may be punched with the compiler 
program or loaded with the object program pricr to 
execution. Functional subroutines are selectively included 
as necessary. The precision of fixed-point (I-type) data 
may vary from 4 to 10 decimal digits, the precision of 
floating-point (E-or F type) mantissas is fixed at 8 decimal 
digits. 

Object execution.. .performance compilation object programs 
generated by the 1620 FORTRAN II for Automatic Floating- 
point may be executed in up to 50 percent less time than 
required by the 1620 FORTRAN II, version 2, depending on 
the proportion of the program chat involves arithmetic 
computations. The translation efficiency and compilation 
speed are essentially the same for both the 1620 FORTRAN 
II for Automatic Floating Point (1620-FO-049) and 1620 
FORTRAN II, Version 2, (1620-FO-019) programs. The object 
programs for the 1620 FORTRAN II for Automatic Floating 
Point, however, begin at core storage location 10000, thus 
providing an additional 1000 positions of core storage 
over the 1620 FORTRAN II, Version 2. 

PROGRAMMING SYSTEMS - Written in FORTRAN, machine language. 

MINIMUM SYSTEM REQUIREMENTS - For compilation- a 40K 1620 
Model 1 or 2 system with 1622 Card Read Punch, Indirect 
Addressing feature. For object program execution- the 
same, plus the Automatic Divide and Automatic Floating 
Point Operations features. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up, reference manual. 
MACHINE READABLE - Processor, subroutine set, FORTRAN 
sample program. 

OPTIONAL PROGRAM PACKAGE 

DOCUMENTATION - Program listings, flowcharts. 
MACHINE READABLE - None. 



ORDERING INFORMATION: PROGRAM NUMBER 1620FO849 



MINIMUM SYSTEM REQUIREMENTS - A 20K 1620 system, 
1 or 2... 1622 Card Read/Punch... 1443 Printer. 



Model 



PROGRAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 
REQUIREMENT 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up... Listings... Flow- 
charts... Manual of 1620 FORTRAN with Format. 

MACHINE READAELE - 1620-1443 FORTRAN with Format 
processor deck plus one of the following options: 
Option 1 - Subroutines (with listings) for machines 
with the Automatic Divide feature and is specified 
by using Program Number Extension 0PT1. Option 
2 - Subroutines (with listings) for machines 
with the Automatic Floating Point feature and 
is specified by using Program Number Extension 
0PT2. Option 3 - Subroutines (with listings) for 
nachines with the Automatic Floating Point, 
Additional Instructions, Indirect Addressing 
features and is specified by using Program Number 
Extension 0PT3. Option 4 - Subroutines (with 
listings) for machines without the Automatic 
Divide feature and is specified by using Program 
Number Extension 0PT4. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620FO037 



OPTIONAL none 





PBOGBAfl SUBB1B 
IXTEHSI08 


DISH 
TYPE 


BASIC 


0PT1 




DTK* 




0PT2 




DIB* 




0PT3 




DTK* 




OPM 




DTB» 


options: 


I none 




none 



DISTRIBUTION MEDIUM 
CODE 



USER VOLUME 
REQUIREMENT 

none 

none 

none 

none 

none 



1620-L M-017 

TRANSPORTATION PROBLEM 

DESCRIPTION - This program solves the transportation 
problem. That is, it minimizes the total cost of shipping 
from M warehouses to N retailers. 

METHOD - A logical search technique applied to the stepping- 
stone methods. Restrictions problems: sizes are indicated 
by the formula 6,000 plus (H) (N) (MODC) plus (M plus N) 
(MODS plus MODC plus 23) plus M (MODS plus 12) plus MODS 
equals cores where M equals number of warehouses max of 
99. N equals number of retailers max of 900. MODS equal 
maximum number of digits used to specify units. HODS equals 
maximum number of digits used to specify cost. CORES 
equals number of positions of core memory. Typical sizes 
are 40 x 50 with both MODS and MODC equal to 5 digit fields, 
«0 x 80 with HODS and MODC, HODS and MODC reduced to 3 
digit fields, or if 40K additional memory is available., 
a 48 x 300 problem may be solved using 3 digit fields. 
Results of a 40 x 50 problem calculation time for a 40 
x 50 test problem varied from 3 min. using 3 digit cost 
and unit fields to 3 3/4 min. using 8 digit fields. The 
variation of core storage used was from about 15,000 to 
over 26,000. The total card input required approximately 
2 1/2 additional min. while output added another 1/2 
min., for a total running time of less than 7 minutes 
Other 40 x 50 test problems have required as much as 8 
minutes of calculation time, using 8 digit fields and 
occupying over 26,000 core locations. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 



1620^10-049 *H 

FORTRAN II FOR AUTOMATIC FLOATING POINT 

DESCRIPTION - The IBM 1620 FORTRAN II for Automatic Floating 
Point, program 1620-FO-049, (card) generates In-Line 



MINIMUH SYSTEM REQUIREMENTS 
Addressing. 



Card or tape I/O. Indirect 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up, listings. 

MACHINE READABLE - Object code. 
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PAGE 006 1620 

COBTINDED PEOB PBIOB PAGE 

OPTIOBAL PBOGBAB PACKAGE 
DOCOMENTATION - Bone. 

BACBIBE READABLE - Object program code for paper tape 
system users. 



1620 
COBTINDED FROM PRIOB COLOMN 

EXTEBSIOB TJPE 
BASIC none DTB* 

OPTIOBAI none DTB* 



CODE BEQOIBEMENT 
00 none 

00 none 



ORDEBIBG IBEORMATIOH: PBOGBAB BOBBEB 162019017 



PBOGBAB NOMBER 
EXTEBSIOB 



DISTBIBOTIOB BEDIOB 
TYPE CODE 



CAEDS 

PT 



OSEB VOIOME 

BEQOIBEBEBT 1620-LB-040 



none 
none 



OPTIONAL none 



1620riSri18 

PBOD.0CTION LINE BALANCING 

DESCEIPTIOM - Given the tines and precedence relationships 
for all of the basic jobs on an assembly line; given also 
the production rate desired, this progran, using a fast 
Heuristic approximation technigue, assigns these jobs to 
operators, minimizing the total number of operators on 
the line. The approximation technigue used reguires that 
the line be zoned and that each job be classified as either 
a must-do (must be done in one particular zone) or a can- 
do (can be done in two or more zones)'. 

Eestrictions - Op to 99 zones per line, fro» 27 to 98 jobs 
per zone depending on the complexity of the precedence 
relationships, up to 98 can-do jobs per line. 

Timing - Very much dependent on the complexity of the 
problem being solved. 

EBCGBABHIBG STSTEBS - Britten in EOBTBAB. 



BIMBOS SYSTEB BEQOIEEBEBTS 
Card I/O eguipment. 



20K 1620 »ith Paper Tape or 



BASIC PEOGBAB PACKAGE 

DOCUMENTATION - Program «rite-up, listings. 
BACHIBE BEADABLB - Object code. 

OPTIOBAL PBOGBAB PACKAGE - None. 

OBDEBIBG IBFOBSATIOB: PEOGBAB NOBBEB 1620LB018 



1620/1403 FORTRAB BITH FOBBAT - 1627 PLOTTEE SOBBOOTINE 

DESCRIPTION - The IBB 1620-11443 FOBTEAB with Format, (1620- 
LB-040) allows the 1627 Plotter output instructions to 
be incorporated into source programs written for the IBB 
1620/1443 FOBTEAB with Format Compiler. The relocatable 
subroutine KBIT can be accessed by a new statement, write 
(99, N) list, which causes the 1627 Plotter to perform on- 
line point-to-point plotting from coordinates supplied 
in the list. The modification deck modifies the 1620/1443 
FOBTEAB with Format Processor to accept the new statement. 
The modification pre-empts 350 core storage locations (35 
symbol table entries). The object time core reguirement 
for the »EIT subroutine is 2830. plotting speed is at 
least two inches per second (200 increments) . 

PEOGBABMIBG SYSTESS - Britten in FOBTEAB. 

HINIHOH SYSTEB BEQOIEEBEBTS - A 20K 1620 system, Bodel 
1 or 2, 1622 card Bead Punch or 1621 Paper Tape Onit, Bodel 
2, 1443 Printer, IBB 1627 Plotter is reguired for object 
program execution. 

BASIC PBOGBAB PACKAGE 

DOCOMENTATION - Program write-up, flowcharts, listings, 

EOBTBAN plotter subroutines. 
BACHIBE BEADABLB - Bodification deck 
PLOT subroutine BEIT. 

OPTIONAL PBOGBAB PACKAGE 
DOCUMENTATION - Bone. 

BACHIBE BEADABLE - Source code. 

OEDEBING INEOBHATIOB: PEOGBAB BOBBEE 1620LB040 

PEOGBAB NOBBEB DISTBIBOTION BEDIOB OSEB VOL0HE 
EXTEBSIOB TYPE CODE BEQOIEEBEBT 



BASIC none 
OPTIOBAL none 



DTB» 
DTB» 



none 
none 



PEOGBAB NDBBEE 
EXTEBSIOB 



DISTBIBOTIOB BEDIOB 
TYPE CODE 



OSEB VOLOBE 
BEQOIBEBEBT 



CAEDS 

PT 



15 

05 



none 16 2 j 
none 



OPTIONAL none 



J620 = LB-039 

FORTRAN 



*H 
IITH FOBBAT. .16 27 PLOTTER SOBBOOTIBE. PBOGBAB JCAEpj. 



DESCRIPTION - FORTRAB compilers supported with plotting 
Facility are FORTRAN with Format, FORTRAN II, and FORTRAB 
II-D (Monitor I and 1443 Monitor I) . Plotter output 
instructions can now be incorporated directly into your 
customers FORTRAN source programs. 

Each program provides a relocatable plot subroutine (written 
for 1620-LM-039) for executing on-line point-to-point 
plotting, calling from FOETBAN source program, write 
(..,N) list for LB-039 control point-to-point plotting, 
call CHAB (list) followed immediately by a format statement 
controls annotation. A modification must be made to the 
FORTRAB with Format compiler which pre-empts 350 core 
storage locations (35 symbol table entries). Bo space 
is reguired in the other two compilers, object time core 
reguirements are for 1620-LM-039 - BBIT, 2830 point-to- 
point plotting speed is at least two inches per second 
(200 increments) . Annotations speed will be variable 
depending on the size of characters, the characters 
themselves, and the distance between characters. 

MINIMOfi SYSTEM BEQOIBEMENTS - compilation and execution 
requirements in each case are the same as those of the 
parent FORTRAN compiler, except that the IBM 1627 Plotter 
is reguired for execution. 

EASIC EECGBAM PACKAGE 

COCOBEBTATION - Program write-up, listings, 
flow-charts, 1620-1627 FOBTRAH Plotter Subroutines 
Manual. 
BACHIBE READABLE - Bodification deck. 
Plot subroutine. 

OPTIONAL PBOGBAB PACKAGE 
DOCOBENTATION - None. 
MACHINE READABLE - Appropriate material delivered. 

OBDEBIBG INFOBBATION: PEOGRAB NOBBER 1620LM039 

FECGRAB NOBBER DISTRIBOTICB BEDIOM OSEB VOLOBE 



-LMii z» 

FOBTEAB IIj. 1627 PLOTTEE SOEROOTINES PEOGEAH. JCARDSJ. 

DESCEIPTIOB - FORTRAB compilers supported with plotting 
facility are FOBTEAB with Format, FOBTBAH II, and FORTRAB 
II-D (flonltor I and 1443 Bonitor I). Plotter output 
instructions can now be incorporated directly into your 
customers FORTRAN source programs. 

Each progran provides a relocatable PLOT subroutine (PLOT 
for 1620-LB-041) for executing on-line point-to-point 
plotting. 1620-LH-041 provides an additional annotation 
subroutine (CHAR) for plotting letters, numbers, and FOBTEAB 
special characters. Call PLOT (list) for 1620-LB-041 
control point-to-point plotting, call CHAR (list) followed 
immediately by a format statement controls annotation. 

A modification must be made to the FORTRAN with Format 
compiler which pre-emFts 350 core storage locations (35 
symbol table entries) . No space is reguired in the other 
two compilers. Object time core reguirements are- 1620- 
LM-041 - plot, 2868 - CHAR, 4350. Point-to-point plotting 
speed is at least two inches per second (200 increments) . 
Annotations speed will be variable depending on size of 
characters, the characters themselves, and the distance 
between characters. 

PROGRAMMING SYSTEMS - Britten in FORTRAN. 

BISIBOB SYSTEBS BEQOIEEBEBTS - Compilation and execution 
reguirements in each case are the same as those of the 
parent FORTRAN compiler, except that the IBM 1627 Plotter 
is required for execution. 

BASIC PROGRAM PACKAGE 

D0C0MENTATIOB - Program write-up, listings, 
flowcharts, 1620-1627 FORTRAN plotter Subroutines 
Manual. 
MACHIHE READABLE - 
Option 1- Plot subroutine code, PLOT 

reguiring Automatic Floating Point feature. 
Annotation subroutine deck CHAR 
requiring Automatic Floating Point feature. 
Specified by using Program Number Extension 0PT1 

Option 2- Plot subroutine code PLOT, 

not reguiring Automatic Floating Point 
feature. Annotation subroutine deck 
CHAR not reguiring Automatic Floating 
Point feature. 
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Specified by using Program Number Extension OPT2. 

OPTIONAL PBOGBAB PACKAGE 
DOCUMENTATION - None. 
machine READABLE - Appropriate material delivered. 

ORDERING INFORMATION: PROGBAH NUHBER 162019041 



PROGRAM NUMBER 
EXTENSION 



BASIC 0PT1 

OPT2 

OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 

DTB* 00 

DTR* 00 

CARDS 15 



USER VOLUHE 
REQUIREMENT 

none 

none 
none 



1620-IM-042 

f PJTRAN II^Di J627 PLOTTER SUBROUTINES^ FBOGRAM (CARD) 



DESCRIPTION - FORTRAN compilers supported with Plotting 
Facility are FORTRAN with Format, FORTRAN II, and FORTRAN 
II-D (Monitor I and 1*1*13 Monitor I). Plotter output 
instructions can now be incorporated directly into yout 
customers FORTRAN source programs. 

Each program provides a relocatable plot subroutine (PLOT 
for 1620-LH-942 for executing on-line point-to-point 
plotting. 1620-LM-041 and 1620-LM-042 provide an additional 
annotation subroutine (CHAR) for plotting letters, numbers, 
and FORTRAN special characters. Call PLOT (list) for 1620- 
LM-042 control point-to-point plotting. Call CHAR (list) 
followed immediately by a format statement controls 
annotation. A modification must be made to the FORTRAN 
with Format compiler which pre-empts 350 core storage 
locations (35 symbol table entries) . No space is required 
in the other two compilers. Object time core reguirements 
are- for 1620-LM-042 - PLOT, 2868... CHAR, 4305. Point- 
to-point plotting speed is at least two inches per second 
(200 increments) . Annotations speed will be variable 
depending on size of characters, the characters themselves, 
and the distance between characters. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 

MINIMUM SYSTEM BEQUIRMENTS - Compilation and execution 
reguirements in each case are the same as those of the 
parent FOBTEAN compiler, except that the IBM 1627 Plotter 
is required for execution. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up, listings, flowcharts, 

1620-1627 FORTRAN Plotter Subroutine Manual. 
MACHINE READABLE - Plot subroutines and 

Annotation subroutine. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE BEADABLE - Appropriate material delivered. 

ORDERING INFORMATION: PROGRAM NUMBER 16201M042 

PROGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 
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VAK SUB 2, VAR SUB N are variables to be plotted and 

S SOB 1, s SUB 2, s SUB N are the formats of these 
variables. 

Source programs which call these plotter subroutines will 
compile at approximately the same speed as any comparable 
program with call statement. 

MINIMUM SYSTEM REQUIREMENTS - FORTRAN II-D... PLOT, 2868 
core positions... Annotation, 4308 core positions 
(Annotation for the 1620 Monitor I, FORTRAN II-D requires 
4304 core positions). A 20K 1620 mdl 2 system with.. . 
1522 Card Read Punch... 1626 Plotter Control and 1627 
Plotter, mdl 1 or 2... 1311 disk Storage Drive, mdl 3... 
Automatic Floating Point feature. Index Registers... 1442 
Printer (when using 1620-1443 Monitor II). 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program Hrite-up, Program Listings, 

Flowcharts. 
MACHINE READABLE - Point-to-point plot subroutines. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Appropriate material delivered. 

ORDERING INFORMATION: PROGRAM NUMBER 1620LM050 



PBOGBAH NUMBER 
EXTENSION 



EASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
DTB* 



USER VOLUME 
REQUIREMENT 



none 
none 



BASIC none 
OPTIONAL none 



DTR* 
DTR* 



none 
none 



1620-PB-011 *j 

GOTBAN JCASP1 

DESCRIPTION - A relatively fast compiler for programs which 
will generally be executed only once. GOTBAN stores the 
compiled program in memory during computation. The object 
program is then executed in an interpretive mode. No 
object tape or deck is produced. After execution of an 
object program, computation of a new object program is 
possible without loading the processor. Restrictions/range: 
the language used in GOTBAN is a modified subset of FORTBAN, 
including the functional subroutines. 

Arithmetic statements are restricted to one arithmetic 
operation per statement. Data is handled in the form of 
10 digit floating point numbers or 3 digit fixed point 
numbers. Input-output is the same form as FCBTRAN with 
the exception that cards are punched with one item per 
card. The maximum number of symbols that may be used in 
490. The number statements allowed is inversely 
proportional to the number of symbols used. Approximately 
211 statements can be compiled using 200 symbols. Storage 
requirements not given. 

MINIMUM SYSTEM B1QUIREMENTS - Basic 1620 card system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PBOGBAH PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620PB011 



16203LH.Z050 *H 

MONITOR II (FORTRAN II-D) J627 PLOTTER SUBROUTINES iCAEDl 

DESCRIPTION - The IBM 1620 Monitor II, FORTRAN II-D, 1627 
Plotter Subroutines, (1620-LM-050) has the combined plot 
and annotation capabilities to control the operation of 
the 1627 Plotter, on-line with the 1620 idl 2. These 
subroutines operate with 1620-1311 Monitor II, Version 
2, (1620-PR-029 card) and 1620-1443 Monitor II, (1620-PR- 
029 card) and 1620-1443 Monitor II, (1620-PR-045 card). 

The plot subroutines (PLOT) allows the user to perform 
pcint-to-pcint on-line plotting from coordinates supplied 
by the arguments of a FORTRAN call statement. The call 
statement is written as CALL PLOT (LIST) , where the items 
in the list provide the input for the plot subroutine. 
The annotation subroutine (CHAR) gives the user an easy 
method of annotating in conjunction with plotting. This 
subroutine utilizes the 1620 FORTRAN II-D program for 
plotting letters and numbers as well as all FORTRAN special 
characters for labeling. It can be accessed by a FORTRAN 
call statement followed immediately by a FORMAT statement 
containing the alphameric information and the FORMAT 
specifications with which the object time values of the 
variables are to be plotted. 

The two FORTRAN statements required for accessing the CHAR 
subroutine must be used in the following order: CALL CHAR 

(N, SIZE, IHV, VAR SUB 1, VAR SUB 2, VAR SUB N) N 

format (S SUB 1, S SUB 2, S SUB N) Where VAR SUB 1, 



PROGRAM NUMBER 
EXTENSION 



BASIC none 

OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTB* 

none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620^28^025 

S CNITOR A ICAR Dl 

DESCRIPTION - Among the outstanding features of the 
sophisticated Monitor I are- 



1. Reduces set up time. 

2. Expedites processor loading. 

3. Expands error checking and correction. 

4. Provides versatile I/O macros. 

5. Simplifies program segmentation. 

6. Provides load and go techniques for SPS and FORTRAN. 

7. Provides compile and go techniques for SPS and FORTRAN. 

8. Intermixing of FORTRAN compilations, SPS assemblies 
and object programs in any order. 

The IBM 1620 Monitor I System is composed of four distinct 
but interdependent programs.* Supervisor program. Disk 
Utility program, SPS II-D, and FORTRAN II-D. The new 
publication, IBM 1620 Monitor I System, C26-5739-1, provides 
complete specifications and operating instructions for 
Monitor I and its four component programs. The *EKOVE 
control record function found in the Disk Utility program 
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specification (IBM 1620 Monitor I System specifications, 
C226-5719-0, pg. 18) has been deleted fron Monitor I System. 
This function can be accomplished by using the *DLOAD, 
and *DELET DOP control functions. The new publication 
covers this function in more detail. 

MINIMUM SYSTEM REQUIREMENTS - 20K 1620 card system with... 
1622 Card Bead Punch... One 1311 Disk Storage Drive... 
Indirect Addressing feature. Automatic Divide is required 
for execution of FOBTBAN II-D compiled programs which 
include floating point arithmetic or functional macro- 
instructions. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Hrite-up. 

MACHINE READABLE - 1620 Monitor 1 System decks, sample 
problem. 

OPTIONAL PBOGBAM PACKAGE 

DOCUMENTATION - Listings, flowcharts. 
MACHINE BEADABLE - Source code. 

OEDEEING INFORMATION: PBOGBAH NUMBER 1620PB025 

PBOGBAM NUMBEB DISTBIBOTICN MEDIUM OSES VOLUME 
EXTENSION TYPE CODE BEQUIBEMENT 



BASIC none 
OPTIONAL none 



HT 7/556 
HT 7/800 



22 
24 



02 
02 



1620^8-029 

J620/13J1 MONITOR IJ (CAR D) 
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- Providing a fixed length subroutine package. 

- Adding an additional phase which optimizes 
subscripting and index register usage. 

Because of the increased speed and the flexibility of the 
Monitor system, the 1620, Model 2, running stacked FORTRAN 
jobs will out-perform many larger and more expensive 
systems. Monitor II, Version 2, is the result of our 
experience gained through the development of 1620 compiling 
systems and a thorough analysis of customer reguirenents. 

MINIMUM SYSTEM REQUIREMENTS - A 20K 1620 system. Module 
2, with... 1622 Card Bead Punch or 1621 Paper Tape unit. 
Model 2... 1311 Disk Storage Drive... Index Begisters and 
Automatic Floating Point Operations features. (Below 
serial #20176, be sure operation codes BTA (10) and BTAM 
(20) are installed) . 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE BEADABLE - Sample problem and Monitor II 
program. 

OPTIONAL PBOGBAM PACKAGE 

documentation - Listings, flowcharts. 
MACHINE BEADABLE - Source code. 

OBDERING INFORMATION: PBOGRAM NUMBER 1620PR029 



DESCRIPTION - 1620 Monitor II, Version 2, a disk-oriented 
system allows the user to execute several programs without 
operator intervention. Jobs to be performed are stacked 
and separated by control cards that identify the jobs. 
Jobs may be processed in any order: i.e., FORTRAN compiling 
jobs, SPS assembly jobs, and previously compiled or 
assembled user jobs, input may be from cards, paper tape 
or typewriter. An optimizing phase has been included in 
the FORTRAN Il-D Compiler eliminating redundant subscript 
address calculations with the use of index registers. 
The result is less generated object code due to fewer 
subscript calculations and hence faster execution of object 
programs. Additional object time speed is obtained by 
the in-line Floating Point instruction, and a new fixed- 
word length subroutine package, compilation speed - with 
the exception of very small programs (less than 32 seconds 
of compilation), compilation time on Monitor II, version 
2, when compared to Monitor I on a 1620 Model 1 is reduced 
by a factor of up to approximately 1. The relationship 
can be expressed by the approximate formula: Y eguals 0.26 
x £ 25 (all times expressed in seconds) where X equals 
Monitor I on a Model 1 compile time and, Y eguals Monitor 
II, Version 2 compile time. 

NOTE - when comparing Monitor II, Version 2 with Monitor 
II, Version 1, use the formula Y eguals 0.62 x B 28. 

Generally, compile times are in the range of from 60-80 
cards per minute. 

Object execution speed - It is difficult to discuss object 
program speed without discussing a particular program. 
If a program is input/output limited, it is obvious that 
no object program speed can he gained. If, however, there 
are extended periods of processing, the gains can be 
dramatic. The following can be stated relative to programs 
which are processor limited (extended periods of computation 
without frequent I/O operations)- The Monitor II, Version 
2, execution time will be reduced by a factor of up to 
7.5 when compared to Monitcr I on a Model 1. 

Example- A processor limited prograi which took 15 minutes 
to execute on Monitor I on a Model 1, now takes 2 minutes 
to execute on Monitor II, Version 2. 

Note- In a similar situation Monitor II, Version 1 execution 
by Monitor II, Version 2. 

object program space- The gain in translation efficiency 
of Version 2 compared with Version 1 is dependent on the 
number and type of subscript expressions in a given program. 
In highly subscripted programs, where the subscripts are 
expressions, the number of generated instructions for 
Version 2 compiled programs has been cut in half. There 
is no reduction in a program which does not use any 
subscripting. 

Faster execution... Faster compiling... Seduced object 
space... Executes up to 71/2 times faster, compiles up 
to 4 tines faster, and reduces object space up to 50 per 
cent when compared to FORTRAN II-D under Monitor I. 

These significant increases are accomplished by- 

- Generating floating point instructions in line. 





PBOGBAH NUHBER 
EXTENSION 


DISTRIBUTION 
TYPE 


HEDIOH 

com 


USER VOLOHE 
REQUIREHENT 


BASIC 
OPTIONAL 


none 
ncne 


DTB* 

HT 7/556 
HT 7/808 


00 

22 
2« 


none 

02 
02 


1620-PR-030 











J620/13_11 MONITOR II JTAPEJ. 

DESCRIPTION - 1620 Monitor II, Version 2, a disk-oriented 
system allows the user to execute several programs without 
operator intervention. Jobs to be performed are stacked 
and separated by control cards that identify the jobs. 
Jobs may be processed in any order-i.e., FORTRAN compiling 
jobs, SPS assembly jobs, and previously compiled or 
assembled user jobs. Input may be from cards, paper tape 
or typewriter. An optimizing phase has been included in 
the FORTRAN II-D Compiler eliminating redundant subscript 
address calculations with the use of index registers. 
The result is less generated object code due to fewer 
subscript calculations and hence faster execution of object 
programs. Additional object time speed is obtained by 
the in-line Floating Point Instruction, and a new fixed- 
word length subroutine package. 

Compilation speed - with the exception of very small 
programs (less than 32 seconds of compilation), compilation 
time on Monitor II, Version 2, when compared to Monitor 
I on a 1620 Model 1 is reduced by a factor of up to 
approximately 4. The relationship can be expressed by 
the approximate formula-Y eguals 0.26 x + 25 (all times 
expressed in seconds) where X eguals Monitor I on a Model 
1 compile time and, 1 eguals Monitor II, Version 2 compile 
time. 

Note- When comparing Monitor II, Version 2 with Monitor 
II, Version 1, use the formula Y equals 0.62 x ♦ 28. 
Generally, compile times are in the range of from 60-80 
cards per minute. 

Object execution speed - It is difficult to discuss object 
program speed without discussing a particular program. 
If a program is input/output limited, it is obvious that 
no object program speed can be gained. If, however, there 
are extended periods of processing, the gains can be 
dramatic. The following can be stated relative to programs 
which are processor limited (extended periods of computation 
without frequent 0/0 operations)- The Monitor II, Version 
2, execution time will be reduced by a factor of up to 
7.5 when compared to Monitor I on a Model 1. 

Example- A processor limited program which took 15 minutes 
to execute en Monitor I on a Model 1, now takes 2 minutes 
to execute on Monitor II, Version 2. Note- In a similar 
situation Monitor II, version 1 execution times are reduced 
by 35 per cent when compiled and executed by Monitor II, 
Version 2. 

Object program space- The gain in translation efficiency 
of Version 2 compared with Version 1 is dependent on the 
number and type of subscript expressions in a given program. 
In highly subscripted programs, where the subscripts are 
expressions, the number of generated instructions for 
Version 2 compiled programs has been cut in half. There 
is no reduction in a program which does not use any 
subscripting. 

Faster execution Faster compiling... Reduced object 

space... Executes up to 71/2 times faster, compiles up 
to u times faster, and reduces object space up to 50 per 
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cent when compared to FORTRAN II-D under Monitor I. These 
significant increases are accomplished by- generating 
Floating Point Instructions in line... providing a fixed 
length subroutine package... adding an additional phase 
which optimizes subscripting and index register usage. 
Because of the increased speed and the flexibility of the 
monitor system, the 1620, Hodel 2, running stacked FORTRAN 
jobs will cut-perform many larger and more expensive 
systems. Monitor II, Version 2, is the result of our 
experience gained through the development of 16213 compiling 
systems and a thorough analysis of customer reguirements. 

MINIMUM SISTEH REQUIREMENTS - A 20K 1620 system. Model 
2, with... 1622 Card Read Punch or 1621 Paper Tape Unit, 
Hodel 2... 1311 Disk Storage Drive... Index Registers and 
Automatic Floating Point Operations features. (Belov 
Serial #20176, be sure operation codes BTA (10) and BTAM 
(20) are installed) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up, Reference Manual. 

MACHINE READABLE - Sample problem. Monitor II system. 

OPTIONAL PBOGRAH PACKAGE 

DOCUMENTATION - Listings, flowcharts. 
MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620PR030 



EASIC 
CFTIOHJL 


PBOGRAB BOBBER 
EXTENSION 

Done 

none 


DISTRIBUTION BEDIOB 
TYPE CODE 

PT 05 

BT 7/556 22 
BT 7/800 21 


DSER VOLUME 
RIQDIBEBEBT 

none 

02 
02 


1620-PE-033 

1620/1113 


HONITOR 1 JCJBD1 






IS 



DESCRIPTION - The 1620/1443 Monitor I, is a major 
modification of the IBB 1620 Monitor I system. The modified 
system uses the IBM 1413 Printer as an integral component 
for on-line listings during compilation or assembly of 
FORTRAN II-D or SPS II-D source programs and as an output 
device for lists or tables in the Disk Utility Program 
(DUP) . In general, printer output now replaces typewriter 
output. Furthermore, listings which are presently obtained 
by listing punched card output from Monitor I off-line 
on an IBH 407, can now be obtained on-line on the 1443 
printer. All 144 print positions nay be used by FORTRAN 
II-D programs. Use and output remains the same except 
that printer output and control cards replace FORTRAN II- 
D console switch settings. 

MINIMUM SISTEH REQUIREMENTS - A 20K 1620 system (Model 

1 or 2)... 1622 Card Read Punch... One 1311 Disk Storage 

Drive... 1443 Printer... Indirect Addressing feature. 

The Automatic Divide feature is required for execution 

of FORTRAN II-D compiled programs, and for execution of 

SPS II-D compiled programs using Floating Point arithmetical 

or functional macro-instructions. 



- Easy-to-use SPS II-D macro-instructions control 
printer operation. 

- FORTRAN print and format statements control printer 
operation including carriage control. 

- Up to 120 characters can be printed on each line by 
FORTRAN object programs. 

- Up to 144 characters can be printed on each line by SPS 
object programs. 

- Object programs may be printed by either typewriter or 
output printer. 

- List and tables are printed on the 1443 by use of the 
Disk Utility Program. 

- On-line program listings are generated on the printer 
during compilation of assembly. 

Core storage reguirements for compilation and assembly- 
The disk storage reguirements for the system are 
approximately one half of a disk storage cylinder more 
than that reguired by Monitor II. The FORTRAN II-D Compiler 
and SPS II-D Assembler each uses core storage positions 
02402 to the limit of available core storage. Their core 
storage reguirements have not been materially increased, 
due to the addition of the printer, for the following 
reasons- (1) The listing of the program being compiled 
or assembled is accomplished by substituting printer 
commands for typewriter commands. (2) Page overflow routines 
from disk storage overlay a portion of the compiler or 
assembler when in core storage. 

MINIMUH SYSTEM REQUIREMENTS - A 20K 1620 mdl 2 system 
with... 1622 Card Read Punch... one 1311 Disk Storage 
Drive... 1443 Printer... Index Registers feature. The 
Automatic Floating Point Operations feature is reguired 
for execution of FORTRAN object programs. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up and Reference Manual. 
MACHINE READABLE - Program decks, sample problem 
for SPS and FORTRAN. 

OPTIONAL PROGRAM PACKAGE 

DOCUMENTATION - Listings, flowcharts. 

MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620PR045 





PROGRAM NUHEER 
EXTENSION 


DISTRIBUTION 
TYPE 


BEDIUB 
CODE 


USEE VOLOBE 
REQDIREBENT 


BASIC 
OPTIONAL 


none 
none 




DTE* 

BT 7/556 
BT 7/800 


00 

22 
21 




none 

02 
02 


■SB-017 
1620/1311 


SOBT-BERGE 


JCABDJ 


L 






*J 



DESCRIPTION - The IBM 1620/1311 Sort/Merge 1620-SM-047 
card program demonstrates the versatility of the 1620 in 
solving both scientific and commercial applications. Users 
have a complete operating program for maximum system 
utilization. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up, Manual of 1620 Monitor I 
System. 

MACHINE READABLE - 1620/1443 Monitor I program, SPS 
II-D sample problem, FORTRAN II-D sample problem 
plus one of the following options: Option 1- For 
machines with 120 print positions and is specified 
by using Program Number Extension OPT1. Option 2- 
For machines with 144 print positions and is specified 
by using Program Number Extension 0PT2. 

OPTIONAL PROGRAM PACKAGE 

DOCUMENTATION - Listings, flowcharts. 
MACHINE BEADABLE - Source code. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620PR033 





PROGRAB 


RUBBER 


DISTRIBUTION 


BEDIUB 


USER VOLUBE 




EXTENSION 




TYPE 


CODE 


REQUIREBENT 


BASIC 


OPT1 






DTR* 


00 


none 




0PT2 






DTE* 


00 


none 


OPTIONAL 


none 






BT 7/556 
BT 7/800 


22 
21 


02 

02 


1620-PE-015 












*B 


J620/J113 


BONITOR 


II 


(CARD). 







DESCRIPTION - The 1620/1443 Honitor II provides printing 
facilities for users. The use and operation of the program 
is essentially the same as for the 1620 Monitor II with 
the exceptions of printer output. 

Added features- 



FEATUBES - 1620-1311 Sort/Herge allows input of data and 
control records from cards or disk pack. Either one or 
two input data files can be sorted or two data files merged. 
Output is on a disk pack. Exit points to user routines 
permit the user to edit or select input records, output 
to other units besides the disk pack, and to return control 
to his program upon completion fo the Sort/Merge Program. 
Records may be either fixed-length or variable-length, 
data may be either numeric or alphameric. Sort/Herge 
consists of 5 phases (0-4) - 

The first 4 phases of the program form a tag for each input 
record and sort these tags into either ascending or 
descending seguence. The tag contains the control fields 
and the location of the record on disk. The size of the 
location field is 8 core positions for variable-length 
records and 2 to 5 core positions for fixed-length records. 
The maximum number of fixed or variable length records 
that can be sorted or merged in 99,999. This number may 
be further reduced depending upon the disk storage space 
available fcr the tag file work area and the input and 
output data files. Phase 4 may be used to scrt records 
into the sequence corresponding to the sorted tags. Maximum 
record length is 2500 core locations (2500 numerical or 
1250 alphameric characters). Each record can contain up 
to 10 control fields and each field can have up to 100 
core locations. The total tag size (control fields plus 
location field) must not exceed 900 core positions. 

HINIHUM SISTEH REQUIREMENTS - A 20K 1620 system mdl 1 or 

2... 1311 Disk Storage Drive 1622 Card Read/Punch... 

Indirect Addressing feature. 



BASIC PROGRAM PACKAGE 

documentation - Program write-up. 
MACHINE READABLE - Object code. 

OPTIONAL PBOGRAH PACKAGE 



Reference Manual. 
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DOCUMENTATION - Flowcharts... Progral listings. 
BACHINE BEADABLE - Source code. 



OBDEEING INFORBATION: PBOGBAB NOBBEE 1620SB0«7 





PBOGBAB NUMBER 
EXTENSION 


DISTRIBUTION 

TYPE 


BEDIDB 
CODE 


OSER VOLUME 
REQOIREBENT 


BASIC 
OPTIONAL 


none 
none 




DTB* 

BT 7/556 
BT 7/800 


00 

22 
24 


none 

01 
01 


1620-SP-009 

SYBBOLIC 


PBOGEABBING 


SYSTEB (CABD I/O) 




*» 



DESCRIPTION - This program system assembles symbolic 
instructions into absolute machine language. The source 
program, consisting of the symbolic instructions, is read 
twice. Restrictions/range: The system can accommodate 
312 labels. 

PROGRAMMING SYSTEMS: Written in absolute machine language. 

MINIMUM SYSTEM REQUIREMENTS - Basic 1620 with Card I/O 
and can be modified for the 1623 Additional Storage Unit. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-Up. 
MACHINE BEADABLE - Object code. 



Listings. 



OPTIONAL PROGRAM PACKAGE - Hone. 

ORDERING INFORMATION: PBOGBAM NDHBEE 1620SP009 



PROGRAM NUMBER 
EXTENSION 



EASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



DSEH VOLUME 
BEQUIREMENT 



none 
none 



162033^020 *M 

1620/1710 SPS (CARD) 

DESCRIPTION - SPS is an extension of 1620 SPS. It provides 
nany additional features in the assenbly of source programs, 
and includes five sets of floating point subroutines for 
use on 1620 or 1710 systems of a variety of configurations. 
These are: (A) fixed length floating point numbers not 
using the Automatic Divide feature. (B) Fixed length 
floating point numbers using the Automatic Divide feature. 
(C) Variable length floating point numbers not using the 
Automatic Divide feature. (D) Variable length floating 
point numbers using the Automatic Divide feature. (E) 
variable length floating point numbers using the Automatic 
Floating Point feature. 

PROGRAMMING SYSTEMS - Written in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up and listings. 

MACHINE READABLE - Option 1 - Easic 1620 and is 
specified by using Program Number Extension OPT1. 
Option 2 - Auto-Divide feature and is specified 
by using Program Number Extension 0PT2. Option 3 - 
Auto-Floating Point feature and is specified by 
using Program Number Extension 0PT3. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620SP020 
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Program Switch 1, produces the ADD table with each object 
deck (the multiply table is always produced). A Model 
1 or Model 2 1620 can be used to assemble programs for 
either model. Object programs produced will utilize 
additional core storage to the extent such storage is 
available. 

The subroutines available for 1620 SPS III are - 



Floating Point Add 
Floating Point subtract 
Floating Point Multiply 
Floating Point Divide 
Divide 

Floating Point Square Root 
Floating Point Sine 
Floating Point Cosine 



Floating Point Arctangent 
Floating Point Exponential 
Floating Point Logarithm 
Floating Point Eight 
Floating Point Left 
Transmit Floating 
Branch and Transmit Floating 



Fixed length (8-digit) subroutines are provided which 
utilize the following two feature configurations- (a) 
No special features, and, (b) Automatic Divide feature. 
Variable length subroutines are provided for those two 
configurations and for a third configuration- (c) Automatic 
Divide and Automatic Floating Point Operations features. 
The floating point Mantissa can range from 2 to 45 digits 
in length in the variable length subroutines. The range 
of Floating Point numbers for the Floating Point subroutines 
is+.1000.../x10 to the minus 99th power to +. 9999.. .9x10 
to the 99th power. 

MINIMUM SYSTEM REQUIREMENTS - A 20K system. Model 1 or 
2... 1622 Card Read/Punch or 1621 Paper Tape Unit, Model 
2.. .Indirect Addressing. 

BASIC PROGEAM PACKAGE 

DOCUMENTATION - Program write-up and listings. 

MACHINE READABLE - Option 1 - Fixed length sub- 
routine and variable length subroutine set not 
using Auto-Divide feature and is specified by 
using Program Number Extension 0PT1. option 2 - 
Fixed length subroutine and variable length 
subroutine set using Auto-Divide feature and is 
specified by using Program Number Extension 0PT2. 
Option 3 - variable length subroutine set using 
Automatic Floating Point feature and is specified 
by using program Number Extension 0PT3. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620SP027 





PBOGBAB NDBBEE 
EXTENSION 


DISTBIBDTION 
TYPE 


BEDIDB 
CODE 


OSES ' 
BEQDI1 


JOLDBE 
BEBENT 


BASIC 


0PT1 




DTB* 




00 


none 




0PT2 




DTB* 




00 




none 




0PT3 




DTB* 




00 




none 


OPTIONAL 


none 




BT 
BT 


7/556 
7/800 


22 
21 




01 
01 


1620-SP-028 
SPS III 


iTAPEl 

















PBOGBAB BOBBED 
EXTENSION 


DISTBIBDTION 
TYPE 


BEDIOfl 
CODE 


DSEE VOLOBE 
EEQOIBEBENT 


EASIC 


0PT1 




DTE* 


00 




none 




OPT2 




DTB* 


00 




none 




OPT3 




DTE* 


00 




none 


CPTIONAI 


none 




BT 7/556 
BT 7/802 


22 
21 




01 
01 


1620-SP-027 
SPS III 


JCJBDJl 










*B 



DESCRIPTION - The 1620 SPS III Processor is a major 
modification of 1620/1710 SPS in which provision has been 
made in the symbolic language for the indexing and Binary 
features available with Model 2 systems. All 1710 mnemonics 
and references to 1710 operations are deleted. The 1620 
SPS III Processor assembles instructions, sets index 
register flags and, depending on the position of Console 
Program Switch 1, produces the ADD table with each object 
deck (the multiply table is always produced) . A Model 
1 or Model 2 1620 can be used to assemble programs for 
either model. Object programs produced will utilize 
additional core storage to the extent such storage is 
available. 

The subroutines available for 1620 SPS II are - 



Floating Point Add 
Floating Point Subtract 
Floating Point Multiply 
Floating Point Divide 
Divide 

Floating Point Sguare Root 
Floating Point Sine 
Floating Point Cosine 



Floating Point Arctangent 
Floating Point Exponential 
Floating Point Logarithm 
Floating Shift Eight 
Floating Shift Left 
Transmit Floating 
Branch and Transmit Floating 



DESCRIPTION - The 1620 SPS III Processor is a major 
modification of 1620/1710 SPS in which provision has been 
made in the symbolic language for the indexing and binary 
features available with model 2 systems. All 1710 mnemonics 
and references to 1710 operations are deleted. The 1620 
SPS III Processor assembles instructions, sets index 
register flags and, depending on the position of Console 



Fixed length (8-digit) subroutines are proved which utilize 
the following two feature configurations- (a) No special 
features, and, (b) Automatic Divide feature. Variable 
length subroutines are provided for those two configurations 
and for a third configuration- (c) Automatic Divide and 
Automatic Floating Point Operations features. The floating 
point Mantissa can range from 2 to «5 digits in length 
in the variable length subroutines. The range of floating 
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point numbers for the floating point subroutines is 
+.1000.18x10 to the minus 99th power to +.9999. . .9x10 to 
the 99th power. 

MINIMUM SYSTEM REQUIREMENTS - A 20K 1620 system, Model 
1 or 2... 1622 Card Bead/Punch or 1621 Paper Tape Unit, 
Model 2. ..Indirect Addressing. 

BASIC PBOGBAN PACKAGE 

DOCUMENTATION - Program write-up, listings and 
flowcharts. 

MACHINE READABLE - Option 1 - SPS III program. 
Compressor program and sample problem. Fixed 
length subroutine set (with listings) not using 
the Automatic Divide feature. Variable length 
subroutine set (with listing ) not using the 
Automatic Divide feature and is specified using 
Program Dumber Extension 0PT1. Option 2 - SPS 
III program. Compressor program and sample 
problem. Fixed length subroutine set (with 
listings) using the Automatic Divide feature. 
Variable length subroutine set (with listing) 
using the Automatic Divide feature and is 
specified using Program Number Extension OPT2. 
Option 3 - SPS III program. Compressor program 
and sample problem. Variable length subroutine 
set (with listings) using the Automatic Floating 
Point feature and is specified by using Program 
Number Extension OPT3. 

OPTIONAL PBOGBAH PACKAGE 
DOCUMENTATION - Hone. 
MACHINE BEADABLE - Source code. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620SP028 

PBOGBAH NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 
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MT 7/800 



I620 = DGj:01X 

CIVIL ENGINEERING COORDINATE GEOMETRY COGO 



CARD 



BASIC OPT1 
0PT2 
0PT3 

OPTIONAL none 



PT 




05 


none 


PT 




05 


none 


PI 




05 


none 


BT 

HT 


7/556 
7/8 00 


22 
21 


01 
01 



162023B13 SPS III (CARD) 

DESCRIPTION - The IBM 1620 1443 SPS III Program, #1620- 
SP-035 (card), is a modification of 1620 SPS III. Its 
processor assembles programs for the IBH 1620 Models 1 
and 2 systems (including provision for the Index Registers 
and Binary Capabilities features), and utilizes the 1443 
Printer as an integral component in the processing of 
source programs written in SPS III Language. A source 
program written in SPS III Language is processed by the 
1620 1443 SPS III program to produce a 1620 machine language 
object program deck or tape which can be loaded and 
executed. Program listings are produced on the 1443 
Printer. Typewriter listings and off-line 407 listings 
are no longer necessary. 

PROGRAMMING SYSTEMS - Britten in SPS III Language. 

MINIMUM SYSTEM REQUIREMENTS - For assembly and execution... 
a 20K 1620 system. Model 1 or 2... 1622 Card Read/Punch. .. 
1443 Printer... Indirect Addressing feature. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up, flowcharts. 
Reference Manual and listings. 

MACHINE READABLE - Option 1 - Subroutines (with 
listings) for machines without Automatic Divide 
feature and is specified by using Program Number 
Extension 0PT1. Option 2 - Subroutines (with 
listings) for machines with Automatic Divide 
feature and is specified by using Program Number 
Extension 0PT2. Option 3 - Subroutines (with 
listings) for machines with Floating Point 
features and is specified by using Program 
Number Extension 0PT3. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620SP035 

PROGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIBEHENT 



DESCRIPTION - COGO 1 is a problem oriented programming 
system designed for civil engineering geometry problems. 
The system is applicable to all phases of horizontal 
geometrical design such as right-of-way computations, sub- 
division layout, highway and ramp design, and structural 
bridge geometry. Using COGO 1, the engineer merely states 
his problem, in his own professional language, to the 1620. 
The computer then solves the problem without the need for 
any machine programming by the engineer. The concepts 
involved are applicable to a wide range of all engineering 
design problems. 

FEATURES - 

- A programming system that allows the civil engineer to 
state his problem to the 1620 in his own professional 
language. 

- An effective sales tool, allowing the engineer to use 
the computer on his own problems with no machine 
programming training. 

- The 1620 can recognize the civil engineer's vocabulary. 

- No forms are involved for original data preparation. 
The engineer can use any piece of paper to state his 
problem — even a surveying field book. 

- There is no limit to the size of problem that can be 
solved, the system is open-ended. 

- No programming — in the usual sense of the word — is 
ever necessary. 

- The system is easily modified and expanded to fit the 
customers needs. 

- The engineer uses his experience, judgement, and 
creative ability in close communication with the 1620. 

The COGO System is divided into a main routine and eleven 
subroutine decks encompassing 43 civil engineering terms. 
The user writes the description of his problem and how 
to solve it with these civil engineering terms. Each line 
of data and descriptive information he has written is 
punched on cards or entered on the console typewriter. 
The user then selects the correct subroutine decks and 
includes them with his description deck. Therefore, the 
run is tailored to the specific problem at hand and since 
the terms can be reused, there is no limit to the extent 
of a run. 

MINIMUM SYSTEM REQUIREMENTS - Any 20K 1620 (card) . 

BASIC PROGRAM PACKAGE 

DOCUHENTATION - Reference Manual... Flowcharts..* 

Listings. 
MACHINE READABLE - Source program... Object program. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620UG01X 

PROGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



BASIC none 

OPTIONAL none 



DTR* 
none 



none 
none 



1620-UG-05X 

CIVIL~ENGINEERING COO RDIN ATE GEOMETRY I - DISK 



EASIC OPT1 
0PT2 
0PT3 

OPTIONAL none 



DTE* 




00 


none 


DTE* 




00 


none 


DTE* 




00 


none 


HT 


7/556 


22 


01 



DESCRIPTION - COGO I - Disk is the new version of Civil 
Engineering Coordinate Geometry which includes the use 
of 1311 disk storage. The present card system (1620-OG- 
01X) will continue to be maintained. 

This problem-oriented-programming system is designed for 
civil engineering geometry problems and is applicable to 
all phases of horizontal geometrical design. This includes 
highway design, right-of-way computation, subdivision 
layout, ramp and interchange design, surveying and layout, 
and structural geometry calculations. 

FEATURES - 

- The civil engineer states his problem to the 1620 in his 
own professional language. 

- An effective sales tool, allowing the engineer to use 
the computer on his own problems with no programming 
training. 

- The 1620 recognizes the civil engineer's vocabulary. 

- No forms are involved for data preparation. The source 
document may be a design drawing or even a surveying 
fieldbook. 

- No limit to the size of problem which may be solved; 
the system is open ended. 

- The engineer uses his experience, creative ability, and 
engineering judgement in close communication with COGO I 
Disk. 

- No programming - in the usual sense of the word, is ever 
necessary. 
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- The system ma; be easily modified and expanded to fit the 
individual customer's needs. 

- Eliminates the need for a programming staff in civil 
engineering geometry applications area* 

USE - COGO I - Disk System is divided into a main routine 
and eleven subroutine decks encompassing 43 civil 
engineering terms. The user writes the description of 
his problem and how to solve it with these civil engineering 
terns. Each line of data and descriptive information he 
has written is punched on cards or entered through the 
console typewriter. The commands are analyzed, necessary 
subroutines are selected from the 1311, brought into core 
storage, executed, and control proceeds to the next command. 

BIMBOS SISTEB BEQOIBEBERTS - Any 2UK 1620 card system 
with 1311 Bisk Storage Drive. CEB number 231 must be 
installed. 

BASIC PROGBAB PACKAGE 

DOCUBEHTATIOH - Reference Banual... System 

Manual. 
BACHIHE READABLE - object program... Source program... 

sample problem. 

OPTIONAL PROGBAB PACKAGE - None. 

ORDEBIBG IHFOBBATIOH: PROGBAB BOBBER 1620OG05X 

PROGRAB HOBBEE DISTRIBOTIOH BEDIOB DSER VOLOBE 
EXTENSION TYPE CODE BEQOIREBENT 

BASIC none DTE« 00 none 

OPTIONAL none none none 
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LESS ARITBBETIC BORE PROGJAflflING 

AOTHOR: E. Hatthys 

DIBECT TECBNICAL INQOIBIES TO: 
E. Hatthys 
IBB Corporation 
424 south Boncoe Avenue 
Green Bay, Wisconsin 

DESCRIPTION - LAHP is a revised version of SPS II for card 
I/O. It Has designed specifically for commercial 
applications reguiring more than the 312 symbols allowed 
hy SPS II for assemblies on a 20K 1620. L1HP allows 670 
symbols and will reduce assembly tine by up to 35 per cent. 

PBOGRABBING SYSTEBS - a version of SPS II. 

BINIHOB SYSTEB REQOIBBBENTS - 20K, 1626 and 1622. 

BASIC FEOGBAB PACKAGE 

DOCOBENTATION - Write-up. 

BACHINE BEADABLE - Appropriate material delivered. 

OPTIONAL PBOGBAB PACKAGE - Bone. 

OEDEBING INFOBBATION: PBOGEAB NOBBEE 1620011001 



PBOGBAB NOBBER 
EXTENSION 



EASIC none 
OPTIONAL none 



DISTRIBUTION HEDIOB 
TIPE CODE 



CABDS 
none 



OSEE VOLDBE 
BEQOIBEBENT 



none 
none 



B. L. Pratt 

Senior Computer Programmer 

Data Corporation 

7400 Old Xenia Pike 

Dayton, Ohio 45432 

DESCRIPTION - Iaproveaent of IBB's 1620 FOBTEAN System. 
Bajor changes are: input may be unformatted, compiler 
and pre-coopiler are built into the same program, several 
programs nay be compiled without reloading the compiler 
each tine, lister is included to provide SPS listing of 
compiled programs. Storage requirements - 20K. 



memory 20K. No 



BINIBOH SISTEH BEQOIBEHENTS - Card 1620, 
special features required. 

BASIC PBOGBAB PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE BEADABLE - Appropriate material delivered. 

OPTIONAL PBOGBAB PACKAGE - None. 

OBDEBING INFOBBATION: PBOGEAB NOBBEE 1620011010 



PBOGBAB NOBBEE 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION BEDIOB 
TYPE CODE 



DTE» 
DTB* 



OSES VOLDBE 
BECOIBEBENT 



none 
none 



1620-01.1.014 

SPS LABEL REFERENCE JJDEXER 



1620-01.1.002 * 

ADDITIONAL INSTEOCTION BACBO SOBBOOTINE 

ADTBOB: Jon Petersen 

DIBECT TECBNICAL INQOIBIES TO: 
Jon Petersen 
Computer section 

Washington state Highway Department 
Transportation Building 
Clympia, Washington 

DESCRIPTION - These subroutines when added to the SPS 
processor package simulate the operations BOTE FLAG *MF 
- 71*, transfer numeric strip *TNS - 72*, and transfer 
numeric fill *TNF - 73* on an IBB 1620 which does not have 
these commands as a special feature but which does have 
the Indirect Addressing special feature. Storage used 
is 528 locations. Indirect Addressing is reguired. 



ADTHOR: 



Pratt 



BINIflOB SISTEH BEflOIBEHENTS - A 
Addressing. 



1620 with Indirect 



BASIC PBOGBAB PACKAGE 

DOCOBENTATION - Write-up on Bicrofiche only. 

BACHINE READABLE - Rone. 

OEDEBING INFOBBATION: PBOGBAB NOBBEE 1620011002 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-01.1.006 

BOLTIPDRPOSE SPS CARD OOTPOT COflPKESSOR 



AOTHOB: Bichael W. Bate 

DIRECT TECHNICAL INQOIBIES TC: 
Bichael w. Bate 

Wolf Besearch 6 Development Corporation 
1st Aerospace Sguadron 
Eox 90 

ENT Air Force Base 
Colorado Springs, Colorado 

DESCBIPTION - Compresses output card decks from SPS 
assembly. Differs from standard compressor as follows: 
Can edit subroutines for inclusion in FORTRAN subroutine 
deck can eliminate half from program leading operation 
allows input decks to be stacked in card reader can return 
control to SPS Assembler. Oses locations 15000 to 18100 
(approximately) . Memory 20K. 

EASIC PBOGBAB PACKAGE 

DOCOBENTATION - Write-up on Bicrofiche only. 

HACHINE READABLE - None. 

ORDERING INFOBBATION: PBOGBAB NDHBEE 1620011006 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



DIRECT TECHNICAL INQOIBIES TO: 
E. L. Pratt 

Senior Computer Programmer 
Data Corporation 
7500 Old Xenia Pike 
Dayton, Ohio 45432 

DESCBIPTION - This program reads an SPS source deck, and 
provides an alphabetized list of all labels defined or 
referred to by the program, together with the page and 
line number of each card which contains a reference to 
the label. About 1300 source card maximum on 20K. Huch 
more on larger memories. Card I/O and a memory of 20K; 
Indirect Addressing. Written to work with AFIT SPS source 
statements, but also accepts regular SPS statements. 

BASIC PBOGBAB PACKAGE 

DOCOBENTATION - Write-up on Bicrofiche only. 
BACHINE BEADABLE - None. 

OBDEBING INFOBBATION: PROGRAB' NOBBER 1620011014 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-01.1.017 

FORTRAN FOBflAT CHECKER 



AOTBOB: Carlos A. Font 

DIRECT TECHNICAL INQOIBIES TO: 

Ismael Rodrigues Astacio 

Electronic Computer and Photogrammetry Division 

Department of Public Words 

Santorce, Puerto Bico 

DESCBIPTION - To edit FOBTBAN/FOBBAT source programs for 
coding errors. Punch instructions substituted by HOPS 
and an error routine added. Restriction/range - The 
equivalent of 16 symbols (160 positions) from the symbol 
table are used for error storage purposes. 

BINIBOB SYSTEB BEQOIEEBENTS - 20K 1620 (card). Automatic- 
Division. Error messages same as in regular FOBTBAN/FOBBAT 
except that they are followed by the printing of the source 
statement in error. 

BASIC PBOGBAB PACKAGE 

DOCOBENTATION - Write-up. 

BACHINE READABLE - Appropriate material delivered. 

OPTIONAL PBOGBAB PACKAGE - None. 

OEDEBING INFOBBATION: PROGRAB NOBBEE 1620011017 

PBOGEAB NOBBEE DISTEIBOTION HEDIOB USEE VOLOBE 
EXTENSION TYPE CODE EEQOIBEBENT 



BASIC none 
OPTIONAL none 



CABDS 
none 



none 
none 



162fc0J.il.0J0 

AFIT IBPROVEE FOBTEAN 



AOTHOB: B. L. Pratt 

DIRECT TECHNICAL INQOIRIES TO: 



1620-01.1.023 

AFIT SYBB01IC PROGRAHBING SYSTEB 



AOTHOB: Bichard L. Pratt 
DIBECT TECBNICAL INQOIRIES TO: 



CONTRIBUTED PBOGRAMS 
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Bichard L. Pratt 

Senior Computer Programmer 

Data Corporation 

7500 Old Xenia Pike 

Dayton, Ohio 15432 

DESCRIPTION - This systen is an improvement of the IBM 
1620/1710 SPS Systen. Its chief advantage is its speed. 
It assembles three to four tines faster than 1620/1710 
SPS. It also includes additional features. In particular, 
it aliens the assembly of relocatable programs. Storage 
used by program - 40K or up. Equipment required by program: 
Card systen, TNS, TNF, HF, Auto Divide, and Indirect 
Addressing. Progran can be used on lesser machine where 
reguirenents can be easily removed - Auto Divide and TNS, 
TNF, HF. Britten in SPS. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 

MACHINE BEADABLE - Hone. 

OBDEBING INFCBHATION: PBOGBAH NUHBEB 1620011023 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBH Progran Order Form. 



1620-01.1.028 

1620 SPS ASSEMBLES BY BICE UNIVERSITY 



». Hobbs 
H. HcCants 



T. McBride 
M. Alexander 



DIBECT TECHNICAL INQUIRIES TO: 
H. HcCants 
Rice University 

Houston, Texas 

DESCRIPTION - This assembler processes source program cards 
at reader speed. It can punch out the symbol table at 
the end of pass 1 for offline listing, With the 40K-60K 
version source program card images are stored in available 
memory during pass 1 so that these cards need not be read 
for pass 2. About 1000 source cards will be stored in 
a 40K machine. The language accepted includes IBH 1620 
SPS version II as a subset. The extended set of operation 
codes is designed for greater convenience and flexibility 
in SPS. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE REAL-ABLE - Hone. 



ORDERING INFORMATION: PROGRAM NUMBER 16213011028 



1620-01.1. £21 

I£IT 



AUTHORS: 



Delhommer P. A. Cloutier 



Indicate "B N 1" in columns 1-3 and the Progran Number 
in columns 4-13 on the IBM Progran Order Form. 



DIBECT TECHNICAL INQUIRIES TO: 
H. J. Delhommer 
P. 0. Box 3664 
Lafayette, Louisiana 

DESCRIPTION - 1620 EDIT is designed to provide data editing 
abilities to the 1620 through progranning. It is very 
similar to that available to 1400 system users with changes 
only to offer nore choices. It Mill work on data in either 
the numerical or alphabetic format. The routine edits 
data using the address locations supplied by the programmer 
in actual or symbolic of the edit word, edit data, and 
edit output (location where result is to be put) and telling 
it to edit, storage used by program - 2246. Equipment 
reguired by progran - Card system, TNS, TNF, HF, and 
Indirect Addressing. Progran can be used on lesser machine. 
Reguirenents that can be easily renoved are TNS, TNF, HF 
Write and Insert subroutine. Programming type subroutine, 
SPS - 1620/1710. This routine is designed to be included 
with an SPS program at compile time. It will later be 
modified to be made a routine under monitor for those using 
1311S. Bunning tine varies with edit word and size of 
ES and data fields. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620011024 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



!620-0J.:U027 

AFIT SYMBOLIC PROGRAMMING SYSTEM., MCDIF IED FOR 80^8 



LISTING 
AUTHOR; 



Richard L. Pratt 



DIRECT TECHNICAL INQUIRIES TO: 

Richard L. Pratt 

Senior Computer Programmer 

Data Corporation 

7500 Old Xenia Pike 

Dayton, Ohio 45432 

DESCRIPTION - This systen is an improvement of the IBM 
1620/1710 SPS System. Its chief advantage is its speed. 
It assembles three to four tines faster than 1620/1710 
SPS. It also includes additional features. In particular, 
it allows the assembly of relocatable programs. It differs 
from AFIT SPS (1.1.023) chiefly in the format of the listing 
output, which can be listed with an 80-80 board. The 
listing deck is only about one-half as large, and therefore 
takes only half as long to punch, and half as long to list. 
Specifications - 40K or more, card input-output. Automatic 
Divide, indirect Addressing, TNS, TNF, and HF. Progran 
automatically adapts itself to memory size. Could be 
reprogrammed fairly easily to renove reguirenents for 
Automatic Divide and TNS, TNF, and HF. Language - Progran 
is written in its own language. 

BASIC ERCGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620011027 

Indicate "B N 1" in columns 1-3 and the Progran Number 
in columns 4-13 on the IBM Progran Order Form. 



16 20-0 1.1.029 

NiCil- HIGH SPEED SPS ASSEMBLER 

AUTHORS: Kurt Germann George Runrill 

DIRECT TECHNICAL INQUIRIES TO: 
Kurt Germann 

Newark College of Engineering 
Computer Center 
323 High Street 
Newark, New Jersey 

DESCRIPTION - This program is an attempt to provide users 
with an SPS assembler that has the language capabilities 
of AFIT SPS and a symbol table size of the order of LAHP 
in a 20K nachine. The assenbler is about 2 to 3 times 
as fast as IBH 1602/1710 SPS exclusive of input-output. 
Uncompressed object decks are usually one half the size 
of corresponding IBM SPS decks and they can be listed on 
a 407 using an 80-80 board. The number of six character 
symbols that can be used in 20K varies from 350 to 462 
depending on whether or not the built-in compressor is 
left in core. A symbol table listing can be punched out 
on cards in alphabetical order at the end of pass 1. If 
the source program in core during pass 1 and eliminate 
the need to manually reenter the source deck for pass 2. 
Variable and fixed mantissa length subroutine decks which 
include built-in FOBTBAN type input-output subroutines 
are also provided. 

MINIHUH SYSTEH REQUIBBHENTS - Card system with Indirect 
Addressing and at least 20K (expands to 40K or 60K 
automatically.) 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up. 
MACHINE BEADABLE - Object code. 

OPTIONAL PROGRAM PACKAGE 
DOCUHENTATION - None. 
HACBINE BEADABLE - Source code. 

OBDEBING INFORMATION: PROGRAH NUMBER 1620011029 





PBOGRAB MJBBEE 
EXTENSION 


DISTKIB0TIOK 
TYPE 


B EDI on 
CODE 


DSEB VOLDBE 
BEQUIBEBENT 


BASIC 
OPTIONAL 


none 
none 


DTB» 
DTB* 


00 
00 


none 
none 


1620-01.1.030 

NELIAC COBPILEB 

AUTHOR: B. B. Stewart 






*» 



DIRECT TECHNICAL INQUIRIES TO: 

H. B. Stewart 

BOX 738 

Bancho Santa Fe, California 

DESCBIPTION - NELIAC is an Algorithmic Language growing 
out of ALGOL. This program rapidly compiles a subset of 
NELIAC which includes as extra features variable fixed- 
point precision, decision without comparison, and literal 
string definition. Execution of divide and floating point 
instructions limited to 1620s with corresponding hardware. 
Storage used - exactly 20,000 digits. 

PBOGRAMHING SYSTEHS - SPS which needs expanded symbol 
table. 



MINIHUH SYSTEH REQUIBBHENTS - Card 1620. Instructions 
provided for conversion to paper tape or typewriter input 
can easily be removed. 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PBIOB PAGE 

EASIC EBOGRAN PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE BEADABIE - None. 

ORDERING INFORMATION: PROGRAM BOMBER 1620011030 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTINUED FROM PBIOR COLUMN 

MINIMUM SYSTEM REQUIREMENTS - 1620 card system with 1622 
Card Bead-Punch, TNS, TNF, MF, Auto Divide and Indirect 
Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620011032 



1620-01.1.031 

TYGO - TYPE-AND-GO SYMBOLIC PROGRAMMING SYSTEM 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHORS: Ronald C. Read P- J. Jutsum 
P. Rouselle 

DIRECT TECHNICAL INQUIRIES TO: 
Ronald C. Read 
Computing Centre 
Mathematics Department 
University of the Best Indies 
Nona, Kingston 7, Jamaica 

DESCRIPTION - This program is a processor which compiles 
an S.P.S. source program directly into storage, thus 
obviating the need for any tape handling other than one 
loading of the processor and the subroutines (if called) . 
Thus an S.P.S. program can be typed in at the console, 
and will be assembled and ready to execute as soon as the 
typing has been completed. Provision is also made to 
accept a source program frcm tape, and to produce an object 
program tape. An object program tape can be produced at 
any time after compilation before and/or after debugging 
the program. Under switch control a listing can be produced 
simultaneously with compilation. In general this listing 
will (necessarily) be incomplete since symbols will have 
been used before being defined, operands that have not 
yet been defined are left blank. At the end of compilation 
a symbol table listing can be produced if required. The 
partial listing together with the symbol table listing 
will usually suffice for debugging purposes, but if a 
complete listing is reguired, this can be obtained by 
making a second pass of the source tape. Provision is 
also made for the statement by statement production of 
a source tape, incorporating the corrections to errors 
discovered by the processor (after the manner of the FORTRAN 
precompiler). The TYGO processor will compile any S.P.S. 
(SP-008) source statement subject to the restriction that 
operands must be of the form - Symbol plus or minus const, 
or simpler. If operands more complex than this occur in 
a program, they can still be handled, with a certain amount 
of operator intervention. The only other restriction is 
on the amount of storage space taken by a program (since 
the processor must remain in storage during compilation) . 
A program of up to 8,000 digits (not counting subroutines) 
should compile comfortably. Shoehorn techniques have been 
built into the processor whereby larger programs (up to 
10,000 digits) can be compiled. Provided the subroutines 
are not called, any number of programs can be processed, 
debugged and executed one after the other (unless a program 
destroys part of the processor) . TYGO is therefore a handy 
adjunct in the teaching of the S.P.S. language, and in 
testing student programs. Bhen no listing of the program 
is reguired, and the aim is merely to compile a source 
program and get it into storage, TYGO will take about one- 
third the time taken by the SP-008 processor to achieve 
this. Even when, in addition, a listing and an object 
tape are required, TYGO is still appreciably faster than 
the two-pass S.P.S. processor. TYGO is written for the 
basic 20K Tape 1620 - no special features. 

BASIC PBCGRAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGRAH NUMBER 1620011031 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.1.033 

££NCH CROSS REFERENCED SYMBOL TABLE FCR MONITOR I SPS II-D 
PSJIDO PROCESS PHASE 

AUTHOR: J. H. Kinney 

DIRECT TECHNICAL INQUIRIES TO: 
J. B. Kinney 
Assistant EDP Manager 
The Childrens Hospital of Akron 
H. Buchtel at Bowery 
Akron, Ohio 44308 

DESCRIPTION - This program produces a label reference index 
similar to 1400 series Autocoder under 1620 Monitor I SPS 
II-D Control. It is superior to Richard Pratt's program 
(01.1.014) for users of the Monitor I System as it allows 
in process operation and no additional passes of the source 
program need be made. The reference deck is produced in 
the process of assembly, and still, the operator or 
programmer has the option of requesting the reference deck 
or not. The drawback of increased assembly tine is more 
than offset by the elimination of a second assembly or 
program phase to produce a reference index. Storage used 
is virtually all of 20K in core. 117 disk file sectors 
for program storage and 400 disk file sectors for work 
area. Equipment required - 1620 Model I with card I/O, 
one 1311 Disk Drive, additional instructions TNF, TNS, 
MF, and Indirect Addressing. The requirement for TNF, 
TNS, MF can be easily removed. The Indirect Addressing 
requirement could be removed, but Monitor I requires it. 
Programmed in SPS and assembled on the Monitor I assembler 
version of SPS II-D. (1620-PB-025, PR-026) . This is a 
process type program - in effect, a pseudo process phase 
of SPS II-D. 

BASIC PBOGRAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGRAH NUMBER 1620011033 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 z 01 i l = .034 *j 

DEFT - DISK EXECUTION OF FORTRAN TRANSFER 

AUTHORS: V. A. LippO P. A. Hricik 

DIRECT TECHNICAL INQUIRIES TO: 
V. A. Lippo 
Best Penn Power Co., 
Cabin Hill 
Greensburg, Pa. 

DESCRIPTION - The DEFT System facilitates loading and 
retrieving information from the disk file when using 
FORTRAN. The DEFT System uses FORTRAN for all main program 
steps, and machine language for program and data transfers. 
The machine language instructions are read into a reserved 
area in the object program in core. The overlapped area 
contains only "go to" and "pause" instructions arranged 
ana labeled so that the DEFT routine entries and exits 
have a FORTRAN label. 



162 0-01.1.0 32 

AFIT LOAD AND GO SYMBOLIC PROGRAMMING SYSTEM 



AUTHOR: 



John C. Pierce 



PROGRAMMING SYSTEMS - Britten in machine language. 

MINIMUM SYSTEM REQUIREMENTS - 20K 1620 card system, 1 disk 
file system with Auto Divide and Indirect Addressing. 



DIRECT TECHNICAL INQUIRIES TO: 
Capt. John C. Pierce 
1600E Arnold Drive 
Rantoul, Illinois 61866 

DESCRIPTION - This program is a modification of AFIT SPS 
and features load and go operation. It includes most of 
the additional features of AFIT SPS but is four to six 
times faster when used on suitably sized programs because 
it does not require the punching and loading of an object 
deck. It can also be used to test and debug large programs 
which can be segmented, since the processor is retained 
in core at all times, the debugging process is accelerated 
greatly. Storage used by program - 20,465 core storage 
positions. 

PROGRAMMING SYSTEMS - Britten in SES. Program can be used 
in conjunction with AFIT SPS, 1620-01.1.027. If it is 
necessary to obtain an object deck, so that a program may 
be rerun at a later time, then AFIT SPS must be used to 
produce the program. AFIT load and go SPS does not 
incorporate this feature. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620011034 

Indicate "B N 1" in col urns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form, 



1620^01^.035 

LOGIC 



AUTHOR: 



G. Olson 



DIRECT TECHNICAL INQUIRIES TO: 
D. G. Olson 
Computer center 
North Dakota State University 
Fargo, N.D. 



CONTRIBUTED PBOGRAHS 



CONTINUED FROH PEIOE PAGE 

DESCRIPTION - Translates FORTRAN IV 

logical expressions to executable Kingston FORTRAN II 
source statements. The resulting deck can than be 
compiled and executed as a regular Kingston FORTRAN II 
source program. An "1" must be placed in column one of all 
statements using logical values or expressions. There 
is a maximum number of three logical and/or operators 
for a logical statement. A maximum of one continuation 
card lay be used in a logical statement. Program reguires 
a 40K card system with Auto Divide and Indirect Addressing. 
Written in Kingston FORTRAN II. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - write-up on Hicrofiche only. 
MACHINE BBAEABLE - None. 



CONTINUED FROH PBIOE COLUMN 

system, permitting batch running of GOTBAN programs. 

MINIMUMUM SYSTBH REQUIREMENTS - storage used by program 

is 20K, Sectors 195165-105199, 105400-105199; a 20K Card 

1620 with disk file Auto Divide is required. A requirement 
which can be easily removed is Auto-Divide. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620012015 

Indicate "B N 1" in columns 1-3 and the Prograi Number 
in columns 4-13 on the IBM Program Order Form. 



OBDEBING INFORMATION: PROGRAM NUMBER 1620011035 

Indicate "S N 1 n in columns 1-p and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.1.836 

P.IJSR z DIS K DU1 STORAGE ROUTINE 



1620-01.2.017 

RELOCATABLE PLOT SUBROUTINE FOB FORTRAN 



AUTHOR: 



E. D. cutting 



DIBECT TECHNICAL INQUIRIES TO: 

c. H. Davidson 

Director, University of Wsiconsin 
Engineering computing Lab. 
Madison, Disc. 

DESCBIPTION - DDSR is a program written in SPS II-D to 
facilitate permanent disk storage of users data from FOBTBAN 
or SPS programs. The blocks of data are given a name and 
table entries that are completely compatible with the 
Monitor I System. The user need not know what sectors 
on the disk are available. 

PROGRAMMING SYSTEMS - Britten in SPS II-I. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model I or II, Indirect 
Addressing, 20K memory, card I/O, 1 disk drive. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE EEADABLE - None. 
ORDERING INFORMATION: PBOGRAM NUMBER 1620011036 



AUTHOR: 



L. B. Alley 



DIBECT TECHNICAL INQUIBIBS TO: 
L. R. Alley 

Center fcr Research and Data Processing 
Central Missouri State college 
Warrensbrug, Missouri 

Relocatable Plot Subroutine for FORTRAN II-D plots arguments 
of 19 independent N-dimensional arithmetic functions having 
a range between 1.0 and 80.9* Digits are automatically 
assigned to each arithmetic statement involving the 
subroutine call word and then punched into a card column 
corresponding to the nearest integral value of the argument. 
All possible argument values are handled by either causing 
a punch in a card when the argument is between 1.0 and 
80.9 or a descriptive error message to be typed. Subroutine 
applicable to virtually all scaled arithmetic statements 
and especially suited to harmonic functions. Equipment: 
Card, disk drive. Indirect Addressing, 1620 Model 1, and 
580 positions of core are used. Programmed in SPS II-D. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READAELE - None. 

OBDERING INFORMATION: PROGBAM NUMBEB 1620012017 

Indicate "B N 1" in columns 1-3 and the Prograu Number 
in columns 4-13 on the IBM Program Order Form. 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.2.0 



1LJXIJ1I CAJD READ ROUTINE 

AUTHOR: F. J. Sarno 

DIRECT TECHNICAL INQUIRIES TO: 

F. J. Sarno 

Eurns and Roe, Incorporated 

160 Nest Broadway 

Hew York, H. Y. 

DESCRIPTION - For SPS programs with large quantities cf 
input data to provide a ready means of reading in any 
amount of alphameric and numeric data desired and 
transferring control to any location desired. To provide 
complete flexibility in ordering input, an output format 
easy to check for errors and an easy means of recouping 
the storage are consumed by the read routine;. 



HINIMUM SYSTEM REQUIREMENTS 
required. 



1620; no special features 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBEB 1620012008 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.2.019 

FBEAD - FBEE-STYLE CARD READING FOR 162g MONITOR II 
FOBTBAN II-D 

AUTHOR: P. P. Enin 

DIRECT TECHNICAL INQUIRIES TO: 
P. P. Emin 

University of New Brunswick 
Computing Centre 
Fredericton, New Brunswick, Canada 

DESCRIPTION - FREAD is a system which comprises two methods 
of permitting free-style, or format-free read statements 
to be compiled and executed in a FORTRAN II-D program. 
The first method, which requires changes to the FORTRAN 
II-D processor, enables the statement "read, list..." to 
compile and execute correctly. The second method requires 
no changes to the processor but read statements must still 
reference a format statement and must be immediately 
preceded by "CALL FREAD" although the format may fce a dummy 
of one used by other I/O since it is not scanned fcy ?READ. 
Method one reguires the use of a library subroutine, while 
method two makes use of subprogram FREAD. Both methods 
permit program data cards to be punched free-style, 
identical to the method of FORGO. Storage use by program- 
library subroutine- 1446 cores, FBEAD - 1644 cores. 

PBOGBAMMING SYSTEM - FORTRAN II-D, SPS II-D. 



1620^01.2^015 

GOTAFIT - 



GOTRAJ AND AFIT FORTRAN FOR MONITOR I SYSTEM 



AUTHOR: J. C. Ewing 

DIRECT TECHNICAL INQUIRIES TO: 
J. C. Ewing 

Dept. of Mathematics and Astronomy 
University of Oklahoma 
816 College Ave. 
Norman, Oklahoma 73069 

DESCRIPTION - Loads the GOTBAN Compiler/Interpreter and 
the AFIT FORTRAN Processor, loader, and subroutines onto 
the 1311 Disk Pack, together with those routines necessary 
for calling these programs through the Monitor I Control 
System. Loading is done by the Monitor I Disk Utility 
Program. The need for loading GOTBAN and AFIT FOBTBAN 
from cards is eliminated with a consequent saving of time. 
GOTBAN has been modified to return control to the monitor 



MINIMUM SYSTEM REQUIREMENTS - 1620, 

Registers, 1 disk pack. 



20K memory. Index 



BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - None. 

OBDEBING INFOEMATION: PROGRAM NUMBER 1620012019 
Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.3.012 

GENERAL GANG-PUNCHING PROGRAM 

AUTHOB: Richard E. Hammer 

DIRECT TECHNICAL INQUIRIES TO: 
Bichard E. Hammer 
Case Institute of Technology 
Cleveland, Ohio 

DESCRIPTION - This program is designed to transfer 
rearranged information from a set of master cards to a 
set of detail cards. Restrictions/range: Up to 50 fields 



CONTEIBUTED PHOGRAHS 



CONTINUED FHCH PBIOB PAGE 



CONTINUED FROM PRIOR COLDHN 



each from one to fifteen characters in length, nay be 
transferred fro* each master card. If each master card 
has exactly one detail card, the number of master cards 
is unlimited, and the program occupies 2,950 positions. 
If not 5000 master cards, each with as nan; as 999 details 
cards, are permitted, and the program occupies 19,897 
positions. 

MINIMUM SYSTEM REQUIREMENTS - Indirect Addressing. The 
program runs at card reader or card punch speed. Various 
error messages are typed when the data does not conform 
to the specifications. 

E&SIC ESCGBAH PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOBHATION: PROGRAM NUMBER 1620013012 

Indicate M E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



of the operations executed during the running of a program 
which is being debugged. Indirect addresses are completely 
traced. The mnemonics for the commands are printed. The 
programmer specifies, by two numbers input to the routine, 
which instructions he wants traced. Outside of the 
specified range the instructions are executed, but not 
printed. In this manner already debugged portions of the 
program and routines such as the floating point subroutines 
can be run through at high speed. Several options as to 
the mode of tracing are provided. 2366 locations. 

MINIMUM SYSTEM REQUIREMENTS - The program will not trace 
TNF, TNS, MF or automatic floating point commands. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620014001 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.3.013 

MONITOR EQUIV ALEN CE TABLE CARD OUTPUT 

AUTHOR: Bryan Betz 

DIRECT TECHNICAL INQUIRIES TC: 
Bay L. Shaffer 
Norden Div. 
United Aircraft Corp. 
Norwalk, conn. 

DESCRIPTION - The Monitor Eguivalence Table Card Output 
program enables one to output the eguivalence table in 
an improved format over the monitor eguivalence table dump. 
Output includes name. Dim No., sector location. No. of 
sectors, F, K, program length, next common, and disk pack 
name. Storage used by program- 1134 plus size of 
eguivalence table. 

PROGRAMMING SYSTEMS - SPS II-D, Mainline, complete. Library 
routines are not part of the output. 

MINIMUM SYSTEM REQUIREMENTS - Card system, X disk file 

system, TNS, TNF, MF , Indirect Addressing. Program can 

be used on lesser machine. Reguirements that can be easily 

removed are TNS, TNF, MF, IA. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620013013 



DYNAMIC TRACE ERCGBAM FOR THE IBM COMPUTER 

AUTHOR: E. G. Balline 

DIRECT TECHNICAL INCUI8IES TO: 
E. G. Balline 

Bell Telephone Laboratories, Inc. 
Hhippany Road 
Hhippany, New Jersey 

DESCRIPTION - Supply a step by step history of a 1620 
program during execution. Selective trace output features 
are provided. Storage 2698 digits. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, Indirect 
Addressing and card input/output. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFOBHATION: PBOGBAM NUMBER 1620014008 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620^01.4^017 

GENERAL 1620 TRACE PROGRAM 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



16 20^0^.3^016 

CABD R1PROEUCEB AND II ST BE NITH GANG-PUNCHING QB EMITTING 

AUTHOR: Howard Givner 

DIBECT TECHNICAL INQUIRIES TO: 
Howard Givner 

Office of Testing and Research 
Brooklyn College 
Brooklyn, New York 11210 

DESCRIPTION - This program will enable the user to use 
the 1620 tc copy any columns of one set of cards into any 
columns of a new set of cards, or into any printer positions 
for a listing on a 1443, and will also, simultaneously 
from a master card, gang-punch information into the new 
cards or emit characters while listing. Data is restricted 
to valid 1620 card codes. 

PROGRAMMING SYSTEM - written in SPS Mainline complete. 

MINIMUM SYSTEM REQUIREMENTS - Basic card 1620 system, no 
I. A. or special instructions needed. 1443 regnired only 
for listing option. 

EASIC PSGGHAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620013016 

Indicate M B N 1" in columns 1-3* and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOR: Bene B. Leblanc 

DIRECT TECHNICAL INQUIHIES TO: 
Rene R. Leblanc 

Automatic Electric Laboratories, Inc. 
400 North Holf Road 
Northlake, Illinois 60164 

DESCRIPTION - This program facilitates efficient debugging 
of 1620 programs by tracing each instruction (within 
DESCRIPTION - This program facilitates efficient debugging 
of 1620 programs by tracing each instruction (within 
specified trace control limits) and punching out (if 
instruction is also within specified output limits) 
instruction address and operation code, and when applicable, 
P or P and Q address (es) , all intermediate indirect 
addresses, contents of P and/or Q addresses (up to 77 
digits) , and the product area (77 digits) . The trace 
program is completely relocatable at load time. It allows 
the program being traced to run under its own control (and 
speed) for all instructions not in region of trace control. 
Hhen the trace is in control, trace output is produced 
only if the instruction being traced is located within 
specified output limits. The trace control limits and 
output limits are typed in after loading the trace. All 
trace output shows exact memory flag and character 
configurations in easily interpreted format. The output 
format associated with each instruction is controlled by 
a matrix of control digits. By altering the control digits, 
the trace output may be changed to print more or less 
information for each instruction. It can also be arranged 
to produce output on branches only. 

PROGRAMMING SYSTEM - SPS 1620/1710 plus special relocating 
loader written in machine language. 

MINIMUM SYSTEM REQUIREMENTS - 1976 consecutive locations 
in storage. Card I/O system. Indirect Addressing, 20K 
storage. Easily modified to work with extra memory and/or 
special instructions. 



16 2 0^0^4^001 

SELECTIVE TRACE 



AUTHOR: 



H. H. Jefferys 



DIRECT TECHNICAL INQUIRIES TO: 
H. H. Jefferys 
Van Vleck Observatory 
Hesleyan University 
Middletown, Conn. 

DESCRIPTION - This program provides a detailed listing 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGBAM NUMBER 1620014017 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



CONTINUED PROH PRIOR COLUMN 



SNOBOL 3 



AUTHOR: 



A LIST PROCESSING LANGUAGE 



David L. Wilson 



DIRECT TECHNICAL INQUIRIES TO: 
David L. Hilson 
University of Wisconsin 
Milwaukee Computing Center 
Downer & Kenwood 
Milwaukee, Disc. 

DESCRIPTION - SNOBOL pernits easy manipulation of strings 
of alphabetic data. It contains capabilities for pattern 
matching, creating new strings, and recursive subroutines. 
Most machine language functions, except for define, have 
been iiplemented. These functions are not available to 
the non-disk user. Storage used - 18K. 

PROGEAMBING SYSTEMS - written in SPS, II-D. A loader is 
included for systems without a disk drive. It replaces 
the non-disk get and put routines and loads a core image 
deck. It can be used with any SPS II-D program. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model 1, 20K, card 
system with Auto Divide, Indirect Addressing. If division 
in source is avoided then Auto-Divide is not reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL EROGBAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 162001402a 



PROGRAM NUMBER 
EXTENSION 



EASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
CARDS 



USER VOLUME 
REQUIREMENT 



none 
none 



1620-01. 4. 025 
ASSIST 



PROGRAMMING SYSTEMS - Britten in SPS-D. 

MINIMUM SYSTEM REQUIREMENTS - A 20K 1620 Model I, card 
I/O, 1 disk drive. Automatic Divide, Indirect Addressing 
and a 1443 Printer. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620014026 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



1620 = 01-.iU027 *M 

FORTRAN PROGRAM STEAIGHTENBB 

AUTHOR: David L. Hilson 

DIRECT TECHNICAL INQUIRIES TO: 
David L. Wilson 

Engineering Computing Laboratory 
University of Wisconsin 
Madison, Wise. 53706 

DESCRIPTION - FORTRAN program duplicated with all statements 
starting in column 7, sequence numbers will appear in 
columns 77-80, and all statement numbers, will be in 
ascending seguence in increments of 10. Kill not process 
if or computed gc to statements which have continuation 
cards. Hill accept both the FORTRAN II I/O statements 
and the FORTRAN IV generalized read/write statements. 

PROGRAMMING SYSTEMS - Written in SNOBOL 3. 

MINIMUM SYSTEM REQUIREMENTS - 40K 1620 Model I, card input- 
output, 1 disk drive. Automatic Divide, Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM SOMBER 162004027 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOR: 



Cr. 



Atkins 



DIRECT TECHNICAL INQUIRIES TO: 
Dr. F. Atkins 

Eastern Illinois University 
Deptartment of Mathematics 
Charleston, 111. 

DESCRIPTION - When called by a program in core, this program 
simulates execution of the program, printing, for each 
instruction, the location of the instruction, the mnemonic 
OP Code, the numeric OP code, the p address, the Q address, 
41 digits from the location pointed to by the P address, 
and 41 digits from the location pointed to by the Q address 
(if applicable, i.e. if the addresses may be expected to 
reference a data field). Fields are printed with flags 
and record marks. After the instruction is executed (or 
simulated) the P field and Q field are again output. Thus 
students and programmers are given a clear picture of the 
transformations performed in core by the executed 
instructions. The program Assist is thus useful as both 
an educational and debugging device. The simulator is 
designed to recognize operation codes 11-49 (except 20, 
30, 40, of course), 55, 71, 72, 73. Considerable revision 
would be reguired to add other instructions to this set. 

PROGRAMMING SYSTEMS - Written in SPS II-D. The program 

is complete, but is ordinarily called by a program in core, 

similar to a subroutine. 



A 1620 
x. Indirect 



MINIMUM SYSTEM REQUIREMENTS - 4,897 positions. 
Model 1 with card I/O 1 disk file, TNS, TNF, M 
Addressing and a 1443 Printer is reguired. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620014025 

Indicate "E N 1" in columns 1-3 and the Program Num 
in columns 4-13 on the IBM Program Order Form. 



1620-01. 4. E26 

MODIFIED FORTRAN FOR MONITOR I x VERSION 2 

AUTHOR: David L. Wilson 

DIRECT TECHNICAL INQUIRIES TO: 
Prof. C.H. Davidson 

Director, Engineering Computing Lab. 
University of Wisconsin 
Madison, Hisc. 53706 

DESCRIPTION - Modified FORTRAN has free format, variable 
format, improved execution time diagnostics, improved trace 
output, and P scaling. All statement MAE option has been 

removed. 



1620-01.4.028 

"ODIFIED FORTRAN FOR MONITOR J A VERSION 2^ 60K 

AUTHOR: David L. Wilson 

DIRECT TECHNICAL INQUIRIES TO: 
Prof. C. H. Davidson 
Director, Engineering Computing Lab. 
University of Wisconsin 
Madison, Hisc. 53706 

DESCRIPTION - Modified FORTRAN has free format, variable 
format, improved execution time diagnostics, improved trace 
output, and P scaling. All statement MAP option has been 
removed. 

PROGRAMMING SYSTEMS - written in SPS-D. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model I, card input- 
output, 1 disk drive. Automatic Divide, Indirect Addressing, 
1443 Printer, 60K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620014028 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620^01^6^.020 

CORES DUMP 402 



AUTHOR: 



Tom Michel 



DIRECT TECHNICAL INQUIRIES TO: 
Tcm Michel 

Argonne National Laboratory 
9400 South Cass Avenue 
Argonne, 111. 

DESCRIPTION - Addressed core dump of any portion of memory 
above location 300 with provision to restore machine at 
end of dump. Console switch option controls 12-digit 
instruction type format or 10-digit numerical field format. 
Storage locations 0-299 and last 5 of core. 



MINIMUM SYSTEM REQUIREMENTS 

and 1622 Card Read-Punch. 



20K, Indirect Addressing, 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016020 



CONTRIBUTED PROGEAMS 



CONTINUED FROM PRIOR PAGE 



Indicate n E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620 Z 0J.6.022 

flSL MNEMONICS DUMP 



AUTHOR: 



Tom Michel 



DIEECT TECHNICAL INQUIRIES TO: 
Tom Hichel 

Argonne National Laboratory 
University of Chicago 
9700 Sourth Cass Avenue 
Argonne, 111. 

DESCBIPTIOH - Interpretive cores dump. If instruction, 
types address, mnemonic, OP code, P and Q fields. Senses 
most packed instructions. If not instruction, type 2, 
5-digit fields. Dumps all characters. Optional zero skip. 
MINIMUM SYSTEM REQUIREMENTS - storage 1868 positions memory 
20K, Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NOMBEB 1620016022 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



CONTINUED FROM PRIOR COLUMN 

an exact copy of its master. The total may be punched 
into a card suitable for use as input. Each card is read 
alphabetically and multiplied by a 2-digit card count. 
The result is split into 20-digit fields and the result 
subtracted from an accumulator. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDEBING INFORMATION: PROGRAM NUMBEB 1620016031 

Indicate n B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^01^043 

JOGGING PROGRAM 

AUTHOR: Karen I. Rooff 

DIRECT TECHNICAL INQUIRIES TO: 
Karen L. Rooff 

Stevens institute of Technology 
Castle Point Station 
Hoboken, New Jersey 

DESCRIPTION - To generate monthly reports of time used 
on the computer for various purposes, such as test and 
production time, educational use, demonstration, machine 
error time and idle time. 



1620-01.6.028 

INPUIzOIIIOT SUBRO UTIN ES FOR USE IN SYMBOLIC PROGRAMMING FOR 
THE CARD 1620 

AUTHOR: Otto Dykstra, Jr. 

DIRECT TECHNICAL INQUIRIES TC: 
Otto Dykstra, Jr. 
General Foods Research Center 
555 South Broadway 
Tarrytown, N.Y. 

DESCRIPTION - To facilitate input of data and output of 
results. One subroutine converts 1 fixed point number 
to floating, another converts up to 99 fixed point numbers 
and stores them consecutively. The output subroutine 
prints at most 8 digits to the left of the decimal point 
and 6 or no digits to the right. 

MINIMUM SYSTEM REQUIREMENTS - 498 digits storage for single 
fixed-float, 782 for multiple fixed-float, and 484 for 
float to fixed and print. Memory 20K. 

BASIC PROGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBEB 1620016028 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.029 

PROGRAM INTERRUPT 



MINIMUM SYSTEM REQUIREMENTS - Memory 20K, Indirect 
Addressing, and card input/output. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016043 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^1^6^045 

FORTRAN COMPRESSOR ANC MULTI-PROGRAMMER 



AUTHOR: 



Donald S. Gardner 



AUTHOR: 



L. T. Michel 



CIRECT TECHNICAL INQUIRIES TC: 
L. T. Michel 

Argonne National Laboratory 
Argonne, Illinois 

DESCRIPTION - Provides for semi-automatic interruption 
and subsequent resumption of a program having no internal 
restart provision. 

MINIMUM SYSTEM REQUIREMENTS - Card system, memory 20K, 
Indirect Addressing, and 1622 Card Read-Punch. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016029 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
Donald s. Gardner 
General Foods Research Center 
555 S. Broadway 
Tarrytown, New York 

DESCRIPTION - This program will compress any regular FORTRAN 
object deck into a near-minimum number of cards, with or 
without the non-relocatable subroutines. It further allows 
for serial cr (block) programming to be done at the object 
level so that a large program can be written in logical 
parts, compiled separately, compressed, and then joined 
together into one program which will be executed, by parts, 
automatically. The restrictions placed on the programmer 
are at a minimum. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K (should work with 
larger systems with a few changes) , card system, and no 
special features required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016045 

Indicate H B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.047 

DBD ipAYS BETHEJN B4JJS1 SUBJOCTINE 



AUTHORS: 



B. McEachran 



C. H. Sheppard 



1620-01.6.031 

CARD HASH TOTAL 



AUTHORS: fl. G. Heideman 



H. Van Nuland 



DIRECT TECHNICAL INQUIRIES TO: 
Robert J. Robinson 
Marquette university 
1515 H. Hisconsin Avenue 
Milwaukee 3, Hisconsin 

DESCRIPTION - The purpose of card HASH total is to determine 
quickly and accurately whether a duplicate card deck is 



DIRECT TECHNICAL INQUIRIES TO: 
A. B. McEachran 
University of Tennessee 
Department of Physiology 
894 Union Avenue 
Memphis, Tennessee 

DESCRIPTION - Calculates the number of days between any 
two dates occurring after January 1, 1900. 

MINIMUM SYSTEM REQUIREMENTS - Storage requirements are 
537, Automatic Divide, and no other special features 
required. (Only slight modifications would be necessary 
to make this subroutine compatible with a machine without 
these features.) 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 



CONTRIBUTED PROGRAMS 



PAGE 0219 1620 

CONTINUED FROM PBIOB PAGE 

ORDERING INFORMATION: PROGBAN NUMBEB 1620016017 

Indicate M E N 1" in columns 1-3 and the Program Number 
in columns 4- 13 on the IBB Program Order Eorm. 



1620-01.6. 051 

FORCOH SUBROUTINES FOB EOBTBAN W/FOBBAT 



1620-01. 6.056 

PLOT SUBROUTINE FOE FOBTRAN 



AUTHOB: John H. Reynolds 



BITH FOBBAT 



ADTHOE: 



Wendell L. Pope 



DIEECT TECBNICA1 INQUIRIES TO: 
Wendell L. Pope 
Computer Center 
Utah State University 
Logan, Utah 

DESCBIPTIOH - These subroutines have the same function 
as those in Mr. Loudens original package, and are adapted 
from then. Kith two exceptions: the absolute value (ABS) 
subroutine has been added, and the PUT subroutine has been 
modified so that the user can detect when left most (most 
significant) digits of a number are dropped. 

HINIBUH SYSTEM BEQUIBEMENTS - IBB 1620, card I/O, any core 
size. Indirect Addressing. 

BASIC PBOGBAB PACKAGE 

DOCUBEBTATIOH - Write-up. 

BACHIBE READABLE - Appropriate material delivered 

OPTIOBAL PBOGBAB PACKAGE - None. 

OBDEBING IBFOBBATION: PEOGBAB NUNBEB 1620016051 



DIRECT TECHNICAL INQUIBIES TO: 
Kurt V. Schoeni 
Senior Mathematician 
Sprague Electric Co. 
Marshall Street 
North Adams', Massachusetts 

DESCRIPTION - This subroutine produces output on the on 
line typewriter rapidly and in graphical form. It plots 
up to six functions with an accuracy of up to 0.71. 

PEOGBABBING SISTEBS - Written in SPS. 

BASIC PBOGBAB PACKAGE 

DOCOBEHTATION - Write-up. 

BACHINE EEADABLE - Appropriate material delivered. 

OPTIONAL PBOGBAB PACKAGE - None. 

OBDEBING IBFOBBATION: PBOGRAB NUHBEB 1620016056 



EASIC 

OPTIONAL 



PBOGBAB NUHBEB 
EXTENSION 



none 
none 



DISTRIBUTION HEDIUH 
TYPE CODE 



CARDS 
none 





PROGEAH NUHBEB 
EXTENSION 


DISTBIBUTION 
TYPE 


HEDIUB 
CODE 


USEB VOLUHE 
EEQUIBEHENT 


ered. 


BASIC none 
OPTIONAL none 


CABDS 

none 


15 


none 
none 


USER VOLUBE 
REQUIREMENT 


1620-01.6.060 

SPS OBJECT DECK ANALYZER 

AUTHOB: Louis A. Bezreh 

DIEECT TECHNICAL INQUIBIES 
Louis A. Bezreh 


TO: 






none 
none 





162fc01_.6_.i53 JM 

SPS FLCATING POINT CCNYEBSION SUBEOUTINES 

AUTHOB: Richard L. Pratt 

DIBECT TECHNICAL INQUIBIES TO: 
Bichard L. Pratt 
Senior Computer Programmer 
Lata corporation 
7500 Old Xenia PiXe 
Dayton, Ohio 

DESCRIPTION - A set of two subroutines to be called by 
macro-operations for use »ith 1620/1710 SPS. These convert 
floating point numbers from internal to external form, 
and vice versa. This is intended for use with I/O commands, 
but the I/O commands are not included in the subroutines. 

PROGRAMMING SYSTEHS - Written in SPS. 



MINIMUM SYSTEH REQUIREMENTS 
features required. 



Memory 20K, and no special 



BASIC FROGRAM PACKAGE 

DOCUMENTATION - Write-up on Bicrofiche only. 
BACHINE EEADAELE - None. 

ORDERING INFORMATION: PBOGBAB NUMBEB 1620016053 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns "-13 on the IBB Program Order Form. 



1620-ai.6_J.55 

PLOT SUBROUTINE FOR FORTRAN 

AUTHOB: John H. Reynolds 

DIBECT TECHNICAL INQUIBIES TO: 
Kurt V. Schoeni 
Sprague Electric Co. 
Harshall street 
North Adams, Massachusetts 

DESCRIPTION - This subroutine produces output on the on 
line typewriter rapidly and in graphical form. It plots 
up to six functions with an accuracy up to 0.7%. 

PROGBABBING SYSTEBS - Written in SPS. 

BASIC PROGBAB PACKAGE 

DOCUBENTATION - Write-up. 

BACHINE READABLE - Appropriate material delivered. 

OPTIONAL PBOGRAB PACKAGE - None. 

ORDERING INFORMATION: PROGRAB NUBBER 1620016055 



John Hancock Mutual Life Insurance Co. 
200 Berkeley street 

Boston, Massachusetts 

DESCRIPTION - An aid to debugging and/or changing any 
processed SPS program, produces a list showing, in 
ascending order, the absolute locations referred to by 
instructions in the object deck, with each such location 
are shown, in ascending sequence, the absolute addresses 
and operation codes of all the instructions making reference 
to it. Also indicates whether Indirect Addressing is used. 

PROGRAHMING SYSTEBS - Written in SPS. 

MINIMUM SYSTEB BEQUIBEBENTS - Any size K. Indirect 
Addressing. 

BASIC PROGRAH PACKAGE 

DOCUBENTATION - Write-up on Bicrofiche only. 
MACHINE READABLE - None. 

OBDEBING INFOBMATION: PBOGRAB NUHBER 1620016060 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-01.6.064 

ANSIS - ALPHANUMERIC SEARCH AND INFORMATION RETRIEVAL 



AUTHOR: 



Gruss 



EASIC 
OPTIONAL 



PROGRAM NUBBEB 
EXTENSION 



none 
none 



DISTRIBUTION BEDIDB 
TYPE CODE 



CARDS 
none 



USEB VOLUME 
BEQUIREMENT 



none 
none 



DIBECT TECHNICAL INQUIBIES TO: 
J. L. C. Lof 
Computer Center 
University of Connecticut 
Storrs, Connecticut 

DESCRIPTION - ANSIB is a Utility program that will locate 
the card or cards on which desired informaticn appears. 
The desired information (called search word) may be in 
the form of an alphabetic word, a group or groups of 
alphameric and special characters, or a machine instruction. 
Ouptut ranges from typing the contents of every card that 
contains the search word to merely counting the number 
of tines it appears in the deck. 

PBOGBABBING SYSTEHS - written entirely in machine language. 

MINIMUM SYSTEM BEQUIBEMENTS - Memory 20K and any 1620 card 
system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Bicrofiche only. 
BACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAB NUMBER 1620016061 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620__J___.6_.0_j5 

FORTRAN II SUBROUTINE FOH PLOTTING WITH & CA1-C0HP PLOTTER 



CONTRIBUTED PHOGRAHS 



CONTINUED FROM PBIOB PAGE 



CONTINUED FROM PBIOH COLUMN 



DIRECT TECHNICAL INQUIRIES TO: 
J. Fassino 
Todd Shipyards Corp. 
P.O. Box 231 
San Pedro, Calif. 

DESCRIPTION - This is a subroutine to be incorporated in 
FORTRAN II library subroutine decks. This subroutine has 
been written expressly for plotting output from an IBM 
1620 computer on a CAL-COMP X-X digital plotter. 



HF, TNF, 



MINIMUM SXSTEH REQUIREMENTS - Automatic Divide, 
THS # card, CAL-COBB Plotter. Fixed point SPS. 

BASIC PROGRAM PACKAGE 

LOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620016065 

Indicate W B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.0 



IQRTRAN FORMAT SUBROUTINE FOR PLOTTING WITH A CAL-COMP 

PLOTTER 



AUTHOR: 



Fassino 



DIRECT TECHNICAL INQUIRIES TO: 
J. Fassino 

Todd Shipyards Corp. 
P.O. Box 231 
San Pedro, Calif. 

DESCRIPTION - This is a subroutine to be incorporated in 
FORTRAN - format library subroutine decks. This subroutine 
has been written expressly for plotting output from an 
IBM- 1620. computer on a CAL-COMP X-Y Digital Plotter. 
MINIMUM SYSTEM REQUIREMENTS - 1622 with automatic divide, 
and the special instructions HF, TNF, INS, card, CAL-COMP 
Plotter. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016068 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 'on the IBM Program Order Form. 



1620 = 01i6.i069 

SOBT-LIBBJHY FUNCTION (FORTRAN IIJ. 



AUTHOR: 



H. 



Anderson 



DIRECT TECHNICAL INQUIRIES TO: 
H. E. Anderson 
Sandia Corp. 
Albuguergue, New Mexico 

DESCRIPTION - Sorts N floating point or fixed point numbers 
in a dimensioned FORTRAN array. 

PROGRAMMING SYSTEMS - Britten in machine language. 

MINIMUM SYSTEM REQUIREMENTS - 1620 card system with 40K 
memory. Automatic Divide, Indirect Addressing, and Floating 
Point hardware. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016069 

Indicate **B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.070 

CARD SEARCHING PROGRAM^, CS3 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016070 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 r 01 i 6..074 

X°JCOH. SUBROUTINES FOR FORTRAN II 

AUTHOR: J. S. webster 

DIRECT TECHNICAL INQUIRIES TO: 
M. J. Orloff 

General Motors Institute 
Flint 2, Michigan 

DESCRIPTION - The FORCOH system is a group of 14 FOBTBAN 
subroutines designed to satisfy three objectives - 

(1) To provide a general purpose interpreter for commercial 
data processing operations. 

(2) To provide a complete input/output editing package for 
technical applications, with complete format control of card 
reader, card punch and typewriter. 

(3) To provide alphameric symbol manipulation facilities at 
the FORTRAN level for logical applications which previously 
reguired machine language programming. 

These subroutines have been adapted from Mr. R. K. Loudens 
original POBCOH package for FORTRAN I. Restrictions/range: 
a maximum of nine card images may be used. The subroutines 
are self-adjusting for any length of mantissa declared 
in the parent program. Standard subroutine deck is for 
40K but can be readily modified for 20K or 60K- 

PROGRAHMING SYSTEMS - Language used in write-up is SPS. 
The write-up contains notes on the use of FORCOH 
subroutines. 

MINIMUM SYSTEM REQUIREMENTS - The number of digits occupied 
by the subroutines are as follows; RCDF, 188, PCHF 152, 
RTCF 116, TABF 116, SPCF 116, GETF 468, PUTF 704, ZONF 
214, PASF 284, TYPF 284, UNLF 322, ENTF 116, CMPF 368, 
CDSF 210 8 (200 X N) (N equals number of card images 
reserved) eguipment specifications minimum 1620 capable 
of using FORTRAN II with card input/output facilities. 
Library function to the FORTRAN II system. 

BASIC PBOGRAH PACKAGE 

DOCUHENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDEBING INFORMATION: PROGRAM NUMBER 1620016074 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620- 01.6. 076 

AUTO FLOAT FORTRAN PROCESSING SYSTEM 



AUTHOR: 



Brittain 



AUTHOR: 



C. wilhoit 



DIRECT TECHNICAL INQUIRIES TO: 
R. C. Bilhoit 
Texas A 6 M Univ. 
Dept. of Chemistry 

Chemical Thermodynamic Properties Center 
College Station, Texas 

DESCRIPTION - Searches a deck of cards for certain 
information previously specified by a deck of control 
cards. A variety of alternatives and combinations can 
be accommodated by the program. Cards which satisfy the 
search criterion can be either removed from the deck 
manually or duplicated by punching another card. 

PROGRAMMING SYSTEMS - Written in SPS. 



DIRECT TECHNICAL INQUIRIES TO: 
A. J. Erittain 
sunstrand Aviation 
2480 H. 70th Ave. 
Denver 21, Colorado 

DESCRIPTION - AUTO FLOAT FORTRAN is a 1620 FORTRAN 
processing system for Automatic Floating Point hardware. 
Many features inherent in a larger machine configuration 
processing system are included. Can be modified for any 
size storage. 

(1) In-line compilation of most Floating Point 
instructions. This feature accounts for most of the speed 
differential between AUTO FLOAT FORTRAN and IBM's Version. 

(2) starting location of object program is 05500. This low 
starting point was accomplished primarily by rewriting all 
subroutines with Floating point instructions. Indirect 
Addressing, etc. 

(3) Continous running object programs. 

(4) Compiler automatically prepares a condensed object 
program with Clear Hemory and Automatic Operation feature. 

(5) Batch compilation if desired. 

(6) Source statements and an improved symbol table dump are 
automatically punched into the select hopper during 
compilation along with their corresponding machine locations 

(7) Compiler contains many error analysis routines for 
checking source statements. 

(8) Non-format or free input, routine. 

MINIMUM SYSTEM REQUIREMENTS - Automatic Divide, Indirect 
Assressing, Automatic Floating Point, additional instruction 
(HF, TNF, TNS) , card I/O. 

BASIC PROGRAM PACKAGE 

DOCUHENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 



MINIMUM SYSTEM REQUIREMENTS - 20K, 
Indirect Addressing. 



1620 with card I/O, 



ORDERING INFORMATION: PROGRAH NUMBER 1620016076 
Indicate "B N 1" in columns 1-3 and the Program Number 



CONTRIBUTED PROGRAMS 



PAGE 022 1620 

CONTINUED FRCM PRIOR PAGE 



in columns 4-13 on the IBH Program Order Porn. 



MODIFIED CDS FORCOM SUBROUT INE FOR FORTRAN WITH FORMAT 



AUTHOR: 



1620-01.6. 086 

FORTRAN II FORJAT STATEMENT PRESEIECTOR 



J. S. Webster 



AUTHOR: 



Petersen 



DIRECT TECHNICAL INQUIRIES TC: 
L. H. Morgan 
Computer Engineer 
flashing ton State Highway Dept. 
Highways-Lecenses Bldg. 
Olyrapia, Washington 

DESCRIPTION - The Format Statement Preselector is a library 
subroutine which, when added to the FORTRAN II processor, 
enables the programmer to write one or more FORTRAN 
statements that examine any column or columns of the card 
that is about to be read. The programmer then writes in 
FORTRAN, a logic network which selects the proper read 
statement. 

PROGRAMMING SYSTEMS - FORTRAN II subroutine subprogram 
(S or F) . The program is a library (IE, SPS) function 
to the FORTRAN system checked SPS subroutine X. 

MINIMUM SYSTEM REQUIREMENTS - 302 positions. Card system. 
Auto Divide, Indirect Addressing. Two subroutines are 
included, one for a compiler without Floating Point hardware 
and for a compiler with Pleating Point hardware. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016086 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns M-13. on the IBH Program Order Form. 



1620-01.6.0 



CLEAR MS 10AD 20K 

AUTHOR: Dr. K. Eisemann 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. K. Eisemann 
Computing Center 
Catholic University 
Washington 17, D.C. 

DESCRIPTION - To clear memory without console manipulation, 
flhen placed ahead of any self-loading program and loaded, 
this program will first clear all of memory to zero and 
then do the equivalent of depressing the reader load button, 
i.e. it then reads-in the next card into locations 00-79 
and branches to 00. Mathematical method-compounded doubling 
of cleared area. 

MINIMUM SYSTEM REQUIREMENTS - 20K memory only. Hill not 
wcrk on a 40K or 60K machine. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016090 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
J. S. Webster 

Engineering E.D.P. Installation 
State Electricity Commission of Victoria 
22William Street 
Melbourne, Australia 

DESCRIPTION - This subroutine is intended to replace the 
CDS subroutine in the normal FORCOM Package of Prof. W. 
L. Pope, Utah State University, Logan, Utah, 1620 Program 
No. 1.6.051, to give the following advantages - 

(A) The modified subroutine is permanently self-clearing, 
i.e. each repeated use of the statement dummy eguals CDS(N) 
in a program, or branching back through such a statement, 
results in the clearing of card images nos. 1 through N. 
(In the operation of the normal CDS subroutine the contents 
of card image no. 1 are transmitted into each of the other 
card images) . 

(B) The modified subroutine completely clears the nominated 
card image area so that gaps between normal card images can 
be used for all FORCOM operations (except direct card 
input/output) by the extension of card image addressing to 
include columns 00 through 99. (In the operation of the 
normal CDS subroutine a flag is set at the beginning of each 
card image which prevents the safe use of the gaps between 
card images where continuity with card images is required) . 
Apart from the economy of making use of the gaps, the 
consequent continuity of addressing results in a 
simplification of programming in some applications. 

The standard subroutine is for 20K, but can be readily 
modified for other sizes of storage. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - The subroutine occupies 180 
*■ (200 X N) digits. (N equals number of card images) . 
Equipment required by program: minimum 1620 with card 
input/output and Indirect Addressing. Programming type: 
library function to the FORTRAN/Format system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016096 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620- 01.6. 098 

GENERAL COMPRESSOR PROGRAM 



AUTHOR: 



Moon 



DIRECT TECHNICAL INQUIRIES TO: 
B. A. M. Noon 
Mobil Computer Laboratory 
University of Canterbury 
Box 1471 
Christchurch, New Zealand 

DESCRIPTION - This program punches from storage a 
sequentially numbered self-loading deck of cards which 
when loaded will leave storage as it was immediately prior 
to its use. Groups of more than 75 consecutive unflagged 
zeros are not punched. The program is especially useful 
for compressing FORTRAN object decks but not limited to 
this use. 



1620-01.6.095 

JDIT SUBROUTINE 



PROGRAMMING SYSTEMS 



AUTHOR: 



Yates 



Written in SPS II. 

Any card 1620 with the 



DIRECT TECHNICAL INQUIRIES TC: 
T. L. Yates 
Director 

Statistics Computing Lab. 
Oregon State University 
Corvallis, Oregon 

DESCRIPTION - To provide data field editting similar to 
the IBM 1401. Input and output in alpha mode. Editting 
includes insertion of punctuation, zero suppression and 
sign ccntrcl. 

MINIMUM SYSTEM REQUIREMENTS - A. Storage used by program 
is 777. B. Eguipment required by program - card system. 
Indirect Addressing, SPS subroutine. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - flrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016095 

Indicate n E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



MINIMUM SYSTEM REQUIREMENTS 
indirect Addressing feature. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016098 

Indicate "B. N 1" in columns 1-3 and the Program N 
in columns 4-13 on the IBM Program Order Form. 



1620-0V.6^099 

SELECTIVE CARD REPRODUCER 



AUTHOR: 



Fassino 



DIRECT TECHNICAL INQUIRIES TO: 
J. C. Fassino 
8031 20th Street 
Westminster, California 

DESCRIPTION - To selectively reproduce any or all card 
columns. A maximum of 13 unlimited fields may be relocated 
under header card control. Restrictions/range: no 
restrictions on field movement, however, there is a maximum 
of 13 fields that may be moved. 

PROGRAMMING SYSTEMS - Written in 1620/1710 SPS. Fixed 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PBIOE CAGE 

Point. 

MINIMUM SYSTEM REQUIREMENTS - 1500 core locations. Card 
read punch, memory 20K X, Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
SACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016099 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01-6.10 



SEARCH AND MEMORY PRINT = SAHP 

DESCRIPTION - This utility program can be used as an aid 
in debugging machine language programs, the instructions 
of which occur at intervals of 12 positions. The search 
writes out the locations and instructions of all conditional 
and unconditional branches to the address being sought. 
The memory print types out any portion of the memory in 
instruction or data format along with the location at the 
beginning of each line. Indirect Addressing in the p-part 
of a branching instruction is assumed to be of one level 
only. 



complete. Language 



PROGRAMMING SYSTEMS - SPS, mainline, 
used in the write-up is SPS. 

MINIMUM SYSTEM REQUIREMENTS - 2600 positions (37400-39999) , 
card system. Indirect Addressing. Program can be used 
on lesser machine. Requirements can be easily removed. 
Source can be modified for 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016100 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 r 0J i 6..J14 

1620^1311 DISK PACK COPY PROGRAM 



CONTINUED FROM PRIOR COLUMN 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016105 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.107 

SPACED ~ SELF-LOADING PROGRAMMERS AID FOR CONSOLE 
EVALUATING AND DEBUGGING 

AUTHOR: R. S. Hostetler 

DIRECT TECHNICAL INQUIRIES TO: 
B. S. Hostetler 
Radiological Health Lab. 
1901 Chapman Ave. 
Rockville, Md. 20852 

DESCRIPTION - SPACED is a valuable aid to the programmer 
who is debugging or evaluating an sps or machine language 
program from the console. Instead of entering machine 
language instructions through the typewriter, the programmer 
enters mnemonic commands with associated operands. These 
commands include a pause-return combination which allows 
the programmer to pause before the execution of any 
instruction in his program and then return to that 
instruction. Also included are a number of commands which 
allow typewriter input and output of data in easily readable 
formats. SPACED is variable in length at object (loading) 
time and is relocatable at object time. 



Other programming language used is 



AUTHORS: 



Eetz S. shinberg 



PROGRAMMING SYSTEMS 
machine language. 

HINIMUM SYSTEM REQUIREMENTS - Storage used by program - 
variable from 673 to 1513 plus 00000 thru 00042. Equipment 
required by program - card system, TNS, TNF, MF, Indirect 
Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABIE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016107 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
R. L. Shaffer 
Norden Division 
United Aircraft Corporation 
Norwalk, Conn. 

DESCRIPTION - The 1620/1311 Disk Pack Copy Program allows 
the operator tc copy part or all of a disk pack to another 
disk pack. The original and copy packs may be on any drive 
of an 2 - 4 drive system. The copying IA (IA nay be easily 
removed) . 

PROGRAMMING SYSTEMS - Written in SES-II-E, complete mainline 

program. 

MINIMUM SYSTEM REQUIREMENTS - 4641 positions, disk file, 
2-4 packs, IA (IA may be easily removed) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016104 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.10 



MOIITOR DIM AND EQUIVALENCE TABLE TEST 



AUTHOR: 



R. R. White 



1620-01.6.105 

IS 5 COM II Z D 



SDBROUTINES FOR FORTRAN II-D 



AUTHORS: E. Eetz S. Shimberg 

DIRECT TECHNICAL INQUIRIES TO: 
R. L. Shaffer 
Norden Division 
United Aircraft Corp. 
Norwalk, Conn. 

DESCRIPTION - This system consists of 17 call type 
subroutines for use with EORTBAN II-D for the IBM 1620/1311 
system. FORCOM II-D was written to provide alphanumeric 
symbol manipulation and card image manipulation at the 
FORTRAN level for logical applications which previously 
required machine language programming. All FORCOH II-D 
subroutines are relocatable and are therefore loaded only 
when needed by a particular object program. 

PBOGBAMMING SYSTEMS - Written in SPS II-D, subroutine. 
Program may be used on a 20K system. 

MINIMUM SYSTEM EEQOIBENENTS - Variable — 11098 maximum, 
card system, X disk file system. No. of packs 1-4, TNS, 
TNF, MF, Auto Divide, Indirect Addressing. 



DIBECT TECHNICAL INQUIRIES TO: 
R. R. White 

Los Angeles Dept. of Water S Power 
P.O. Box 3669 
Terminal Annex 
Los Angeles, Calif. 90054 

DESCRIPTION - This program punches cards to list all entries 
to the DIM Table in the 1620 Monitor System. Where a 
program also has a name entered in the Equivalence Table 
the name is listed with its associated DIM entry. The 
program is assembled to run independently of the monitor 
and was written to be able to determine if either the DIM 
Table or Equivalence Table has been inadvertently altered, 
but can be conveniently used to list DIM entries of all 
the programs on disk. (5) n/a. (6) DIM Table and 
Equivalence Table lengths must be as originally set up 
in monitor 1, e.g., 999 entries in the DIM Table and 80 
sectors with 500 program names in the Equivalence Table. 

PBOGBAMMING SYSTEMS - SPS - 1620/1710, mainline, complete 
with I/S and TNF instructions. 

MINIHUM SYSTEM BEQUIREMENTS - This program is self-contained 
and generates its own data. Output is punched cards to 
be listed with a standard 80-80 board on a 407 or other 
listing device. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016108 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^01.6^109 

DEPAUW MACHINE LANGUAGE INTERPRETER 



AUTHOR: 



R. B. Nelsen 



DIRECT TECHNICAL INQUIRIES TO: 
B. B. Nelson 
Computer Center 
Depauw University 
Greencastle, Indiana 46135 



CONTBIBOTED PBOGBABS 



CONTINOED FBOB PBIOE PIG! 

DESCBIETIOB - The program is designed to interpret a deck 
of machine language cards, each card containing six machine 
language oreder in card columns 1-72- The program separates 
the numeric operation code and the P and Q addresses, and 
also supplies the mnemonic operation code and the address 
of each order. The output is designed to resemble the 
coding sheet form X26-5591-0. The purpose of this program 
is to aid the programmer in debugging machine language 
routines and also provides a convenient method for listing 
student machine language programs. 

PBOGBAHHINS SISTERS - Britten in basic machine language. 

BIHIBOB SISTEB BEQtJIBEBEBTS - IBB 1620 card system, 20K 
memory. Indirect Addressing. 

BASIC PBOGBAB PACKAGE 

COCOBEBTATIOB - Irite-up on Bicrofiche only. 
BACHIBE READABLE- None. 

OBDEBIHG IHFOBHATIOH: PBOGBAB NOBBEB 1620816109 

Indicate "B B 1" in columns 1-3 and the Program Number 
in columns 0-13 on the IBB Program Order Form. 



1628-81.6.111 

DATE DIFFEBENCE SJBEOOTINE - DATDIF 

AOTHOBS: J. «. Gaskill K. B. Weiss 

DIBECT TECHNICAL INCOIBIES TO: 
J. B. Gaskill 
Badiological Health Lab. 
1901 Chapman Avenue 
Bockville, Baryland 

DESCBIPTION - This subprogram calculates the elapsed time 
between any t»o dates in the twentieth century. The elapsed 
time is calculated in minutes, hours, and days, and all 
three results are returned to the mainline program. A 
date consists of the year, month, and day, each as a 2- 
digit number, and the time of the day (military time) as 
a 1-digit number. For each date entered, the elapsed time 
in minutes is calculated from the first minute of the year 
1981. The difference of these results if the elapsed time 
in minutes between the two dates. Dividing by 60 and then 
by 24 gives the elapsed tine in hours and days. The 
differences calculated are exact, that is, an extra day 
(s) for leap year is accounted for when necessary. 

PBOGBABBIHG SISTEBS - Britten in FOBTRAN II. 

BIBIBDB SISTEB REQ.OIBEHEHTS - 1158 core positions used. 

BASIC PBOGBAB PACKAGE 

COCOHENTATION - Hrite-up on Bicrofiche only. 
BACHINE BEADABLE - None. 

OEDEBING INFOBBATION: PBOGBAB NOBBEE 1620016111 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620t0,1.6.1U 

EOniPBENT AND PBOJECT T IBE DISTBIBOTIO.N 

AUTHOB: J. B. Botolo, Jr. 

DIBECT TECHNICAL INQOIBIES TO: 
J. B. Botolo, Jr. 
Computer Center 
Hofstra University 
Hempstead Turnpike 
Hempstead, Sew lock 

DESCBIPTION - Evaluates for each of the computer center's 
machines the number of hours spent in operation, type of 
work performed (debugging, production, etc.) on a particular 
machine, and the various departments which have used the 
center's facilities. Enclosed can be found flow charts, 
sample source material, operating procedures, sample output 
reports and flow chart explanations. Limited to six types 
of work performed plus down time, and six machines. Time 
must be in 20-hour clock form. Program uses locations 
00182-05089. Remaining storage is used for totals. Program 
is designed to test machine's storage capacity and to 
modify the number of projects accordingly. 

PBOGBABBING SYSTEBS - Britten in SPS fixed point. 

BINIHOB SISTEB BI0.0IREHEHTS - Card system and Indirect 
Addressing. In the project report for each project number, 
190 positions of storage are reguired. 

BASIC PBOGBAB PACKAGE 

DOCUBENTATION - write-up on Bicrofiche only. 
BACHIBE BEADABLE - None. 

OBDEBIHG INFOBBATION: PEOGEAB NOBBEE 1620016111 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



WESTEBN CAROLINA 



1620-01.6.112 

GJTBJC SOBBOOTINE FOBTBAN II^D 



AOTHOB: 



Frank Nicolazzo 



CIHECT TECHNICAL INQOIBIES TO: 
Frank Nicolazzo 
Aluminum Company of America 
1501 Alcoa Bldg. 
Pittsburgh, Pennsylvania 

DESCBIPTION - Gives FOETBAN programmer access to data 
anywhere on 1311 's by sector, permits movement of data 
to and from permanent storage area under FOBTBAN prog, 
control vs. DOT control. (Ex. 1) CALL GITEBC 
(3,15080,15999,1,219) would move 100 sec. from disk drive 
3 to work cylinder on drive 1 in 65 sec. (Ex. 2) CALL 
GETEEC (1,3088,3999,1,319) would move 108 sectors from 
disk drive 1 to another area on disk drive 1. One card 
must be changed to handle a specific word size. The 
subroutine as submitted is for F and K of 0806 2 card must 
be changed to change the name. 

PBOGBABBING SISTEBS - FOBTBAN IID, subroutine. Language 
used is SPS IID. 

BINIBOH SISTEB REQOIREBINTS - 600 storage locations, 
standard flcnitor I specification (card), card system, disk 
file system. Indirect Addressing. 

BASIC PBOGBAB PACKAGE 

DOCOHENTATION - Write-up on Bicrofiche only. 

MACHINE BBADABLE - None. 

CBDEBING INFOBBATION: PBOGBAB NOBBEB 1620816112 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1628-81.6.117 

AOTOHATIC DATA CORRECTION SISTEB 
COLLEGE 

AOTHOB: H. D. Kennedy 

DIBECT TECHNICAL INQOIBIES TO: 
H. D. Kennedy 
Computer Operations 
Hestern Carolina College 
Cullowhee, North Carolina 

DESCBIPTION - The system consists of two programs — phase 
I and Phase II. Two data decks are punched from the same 
source document. These decks serve as input to Phase I 
which reports discrepancies (errors) in cards of the same 
sequential positions of the two decks. If desired, only 
specified columns may be compared for errors. Phase I 
output, on cards, is listed and provides the means for 
simple error analysis and the punching of a corrector card. 
Phase II is then used to automatically correct the errors. 
Advantages of the system are the following — (1) It 
obviates the verifier, (2) aispunched cards are never 
handled individually, (3) It is rarely necessary to repunch 
the correct letter, number, or symbol in correcting an 
error, and (1) It provides an index of keypunch accuracy. 
The programs automatically adapt to a memory of any size. 
The system is constructed so that it can be used by a 
person with only slight experience in using the 1620. 

PBOGBABBING SISTEBS - Britten in SPS - 1628/1710. 

HIBIHOa SISTEB BEQOIEEBENTS - Both phases, with data, use 
all of the memory of the machine, 1620 card system with 
TNF, TBS, and Indirect Addressing (minimal configuration) . 

BASIC PBOGBAB PACKAGE 

DOCOBENTATION - Nrite-up on Bicrofiche only. 
BACHINE EEADAELB - Hone. 

OBDEBIHG INFOBBATION: PEOGEAB NOBBEE 1620016117 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program order Form. 



1620-81.6.119 iS 

BEPBODOCEB lOB RJSC0E x I..E. REPRODOCB. ISilt. *S£ SEQUENCE ON 

coeT" 

AOTHOE: Harilyn S. Hilson 

DIBECT TECHNICAL INQOIBIES TO: 

Bussell A. Altenberger 
Oniversity of Baine 
Oniversity Computing Center 
Orono, Baine 

DESCBIPTION - This program simulates the card reproducing, 
emitting, and seguencing functions of an IBB 519 Beproducer. 
op to six functions nay be performed at the same time, 
specified by control cards - (1) move fields (up to 18 
fields, each of any length) , (2) emit characters, (3) set 
to blank, (1) clear flags, (5) set flags, and (6) sequence 
(from a specified initial number and by a specified 
increment) . The control card format is simple (simple 
enough to be punched from memory) and the number of control 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 



CONTINUED FROM PRIOR COLOHN 



cards is leu (1, 2, or 3 per function used), despite the 
versatility of the program. 

PROGBAMHING SYSTEMS - Written in SPS - 1620/1710. 



PROGRAMMING SYSTEMS - 1620-SP-035. The general edit 
subroutine generates its ovn linkage and return address 
and therefore does not need the use of IBM's "PICK" 
subroutine. 



MINIMUM SYSTEM REQUIREMENTS - 20,000 minimum storage 
(progran uses 00401-12809). Card system, TNS, TNF, MF, 
Auto Divide, Indirect Addressing. 

BASIC EROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAN NUMBER 1620016119 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the ISM Program Order Form. 



MINIMUM SYSTEM REQUIREMENTS - Card; TNS, TNF, HF, Indirect 

Addressing, 1620 Model 1. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016128 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.123 

FORTRAN CAIL SUBROUTINES ICE PLOTTING 



1620-01.6.130 

Vhlh. UNITING 1B0GBAH 



AOTHOH: 



E. Turney, Jr. 



DIRECT TECHNICAL INQUIRIES TO: 
J. E. Turney, Jr. 
Hgt. Research Dept. 
B. P. Hood 6 Sons, Inc. 
Char lest own, Massachusetts 

DESCRIPTION - To determine data range and prepare card 
images containing reference numbers, scale ranges, and 
scaled data points, output may be listed on standard 
printer for graphic presentation of data. 

MINIMUM SYSTEM REQUIREMENTS - Depends on use of local 
control. Minimum - 1326, Maximum - 3574. 1620 card system 
with 20K Automatic Divide - Indirect Addressing - and one 
1311 Disk Drive is reguired. Uses FORTRAN II-D with Monitor 
I System. User's system must contain functional subroutines 
VAFP1F and VAFP2F (Program No. 13.0.010). 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016123 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOR: 



L. Bright 



DIRECT TECHNICAL INQUIRIES TO: 
D. L. Wright 
Computation Center 
Georgetown University 
Washington, D.C. 20007 

DESCRIPTION - Progran makes plots on an on-line CALCOMP 
Plotter of data supplied from cards as input. Up to twenty 
variables may be used as input, and any two variables may 

be plotted against each other. Up to ten different plots 
may be made on the same graph, and the scales of the two 
axes may be different for each set of variables plotted. 
Each plot may be labeled with one line of alphameric 
characters along the x-axis and one along the Y-axis. 
The minimum and maximum scale values are also written on 
both axes if desired. 

PROGRAMMING SYSTEMS - Programmed in Fortran h-d, and SPS 
II-D. Program is three parts - (1) Mainline SPS (2) 
Ha inline FORTRAN (3) FORTRAN Subroutine in SPS. 

HINIMUM SYSTEM REQUIREMENTS - A 20K 1620 Model 1 card 
system with 1 disk file and TNS, TNF, HF; Auto Divide; 
Indirect Addressing; Floating Point hardware. Special 
instructions and AFP can be replaced by macros. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 



1620-01 .6.12 5 

DISK CLEANER 



AUTHOR: Dennis Hoser 



DIRECT TECHNICAL INQUIRIES TO: 

Professor C. H. Davidson 

Director, Engineering Computing Laboratory 

University of Wisconsin 

Madison, Wisconsin 53706 

DESCRIPTION - Disk Cleaner is a program written in IBM 
SPS II-D (Monitor I system) which is designed to keep a 
single 1311 Disk File free of DIM numbers which do not 
have entries in the Eguivalence Table. Both the Equivalence 
and Sequential Tables are read from disk into core and 
DIM number comparisons are made. When a DIM number is 
found in the Sequential Table that doesn't exist in the 
Equivalence Table, two output cards are produced which, 
under monitor control, will delete this entry. It should 
be noted that DIM numbers 0001 through 0169, those used 
by the monitor system, are protected by the program. Under 
no circumstances will the output cards produced be capable 
of deleting these entries. Disk Cleaner is restricted 
to a 1620 with one 1311 Disk File. A 1620 Model I or II 
with 20K memory, card I/O, Indirect Addressing and 1 disk 
drive. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016125 

Indicate W E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



ORDERING INFORMATION: PROGRAM NUMBER 1620016130 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Progran Order Form. 



1620-01.6. 131 

PLOT A BLOCK DIAGRAM 



1620-01.6.128 



AUTHOR: 



L. D. Salus 



DIRECT TECHNICAL INQUIRIES TC: 
L. D. Salus 

Electronic Data Processing, Inc. 
60 Coral Center 
Fort Lauderdale, Florida 

DESCRIPTION - To provide the 1620 SPS programmer with an 
ease of editing similar to the hardware edit of the IBM 
1401 systems. Incorporated is a new macro instruction 
with three operands which specifies the field to be edited, 
where the edited field is to be stored and the format of 
the editing desired. 



AUTHORS: T. M. Harts Susannah 



Young 



DIRECT TECHNICAL INQUIRIES TO: 
T. M. HartZ 

USPHS, Div. of Radiological Health 
1901 Chapman Ave. 
Rockville, Md. 

DESCRIPTION - This program utilizes a 1620 computer, card 
read/punch, CALCOMP Plotter to convert any SPS program 
into block diagram form for purposes of program 
documentation and permanent records. All SPS Op codes 
including those for plotter and disk operation (but not 
floating point) are provided for. The plotter will produce 
for each Op code its conventional symbol. Furthermore, 
each symbol is complete with Op code, P Operand, Q Operand, 
Flag Operand and/or label, if present, logically positioned. 
The plot is drawn horizontally and the plotter draws an 
11 inch horizontal line every 8 1/2 inches as the paper 
unrolls. There are two lines of the block diagram on each 
8 1/2 x 11 page. Error messages to describe instruction 
discrepancies are produced, but diagramming can continue 
if the operator so desires. The only limit placed on the 
number of instructions which can be drawn by the plotter 
is the available time. 

PROGRAMMING SYSTEMS - Written in SPS - 1620/1710. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 card system with 40K 
memory, CALCOMP On-Line Plotter, one disk file system, 
TNS, TNF, MF Auto Divide and indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016131 

Indicate "B N 1" in eclunns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



1^0^01^6.133 

II;OJJTIJG_. = POINT SORTING SUBROUTINE FOE FORTRAN II=P- 

AUTHOR: I. Satterthwaite 

DIRECT TECHNICAL INQUIRIES TO: 
E. Satterthwaite 
University of Delaware 
computing Center 
Newark, Delaware 19711 

DESCRIPTION - Subroutine for rapidly sorting elements of 
a FORTRAN Floating-Point array, Similar to 1620-01-6.069 
but written as a subroutine for the Monitor-II/FORTRAN .., 
II-D System, uses index registers, and sorts Floating-Point 

only. Typical sorting time for 1000 elements is 30 seconds. 
Storage used- 188 core positions. 

PROGRAMMING SYSTEM REQUIREMENTS 
D. 

MINIMUM SYSTEM REQUIREHEHTS - A 1620 card system With disk 
file system, TNS, TNF, HF, Auto Divide, Indirect Addressing, 
Floating Point hardware, ana a 1620 Model II equipped for 
Monitor II. 



Programmed in SPS II- 



CONTINUED FROM PRIOR COLUMN 

The EMS may also be used to manually interrupt a job, and 
restart it at a later time. 

PROGRAMMING SYSTEMS - Can easily be modified to operate 
with the latest versions of PR-025, PR-026, PB-033, or 
PB-031, and operate with paper tape systems. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 card system, with 
Model 1 or 2, with at least 20000 core positions, a 1311 
Model 3 Disk Drive, and the special feature. Indirect 
Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016135 

PHOGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



BASIC none 
OPTIONAL none 



CARDS 
none 



none 
none 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016133 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620 = 0J.6.131 

DISK IOCS ROUTINES^ CONTROLS SEQUENTIAL A DDITI ONS AND DISK 
Q1III2Z I 5 CK AGE 

AUTHOB: P. Delashmutt 

DIRECT TECHNICAL INQUIRIES TO: 
P. Delashmutt 
IBM Corporation 
3833 N. Fairfax Dr. 
Arlington, va. 

DESCRIPTION - This paper discusses aisk input output 
routines and programs available for the 1620/1311/1413 
system. Read, Write, Seek Check and Error routines are 
provided which allow for file processing without monitor. 
Get ana Put routines handle blocking and deblocking of 
records during consecutive or control sequential processing 
and issue actual file reads or writes vhen all records 
in a block have been processed. If a control sequential 
file is specified, the routines check for chained records 
and process these records in sequence. Random processing 
is handled by Direct Addressing Read and Write routines. 
An Open routine checks the internal pack label. The user 
supplies the parameter cards required by the routines used 
in his program and inserts the linkage instructions in 
his program when he wants tc Read or Write Disk or check 
a pack label ... the Control Sequential Additions program 
adds records to a control seguential file and creates the 
necessary linkage to, within and from the additions area. 
The user supplies the record assembly and end of file 
routines and includes ten parameter cards.... the disk 
utility package provides zero pack, label pack, file-to- 
printer, and alter sector programs. 

MINIMUM SYSTEM REQUIREMENTS - A 20K machine with Indirect 
Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016131 

PROGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



1620-01.6.136 

flACROINSTRUCTION FLOATING POINT FORMAJ! SUBROUTINES FOR SPS 

II = D " 



AUTHOR: 



E. Satterthwaite 



1620-01.6.135 

EXTENDED MONITOR SYSTEM JEMS.! 

AUTHOR: H. Givner 

DIRECT TECHNICAL INQUIRIES TO: 
H. Givner 

Testing and Research 
Brooklyn College 
Brooklyn, N.Y. 11210 

DESCRIPTION - The EMS is designed especially to allow users 
of PR-033, Version 1 to load checked-out machine language 
programs and object programs (that have been produced 
without the monitor) onto the monitor disk pack, so they 
may be called for execution in the same manner as programs 
assembled with SPS II-D or compiled with FORTRAN II-D. 



DIRECT TECHNICAL INQUIRIES TO: 
E. Satterthwaite 
University of Delaware 
computing Center 
Newark, Del. 19711 

DESCRIPTION - A set of two subroutines providing the 
macroinstructions FHTE and FMTF. Each macro requires three 
operands. A, B, ana C. Execution of FMTE results in 
conversion of a floating-point B field. to the corresponding 
alphanumeric FORTRAN-like E-field with Adaress A. The 
C fieia contains format specifications. FMTF is similar 
but results in an alphanumeric F-field. Usual macro 
programming restrictions apply. 

PROGRAMMING SYSTEMS - Programmed in SPS II-D, macro. 

MINIMUM SYSTEM REQUIREMENTS - Storage required - 691 (FMTE) 
and 1058 (FMTF) core positions. Equipment reguired - 
Monitor I or Monitor II cara system, TNS/TNF/MF, Indirect 
Aaaressing, Pleating Point hardware (TFL only) . TFL 
requirement can be removed by suitable restrictions on 
B Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016136 

Indicate "B N 1" in columns 1-3 ana the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620^1^137 *U 

DISK PACKER 

AUTHOR: D. Moser 

DIRECT TECHNICAL INQUIRIES TO: 

Prof. C. H. Davidson, Director 
Engineering Computing Laboratory 
University of Wisconsin 
Madison, Wise. 53706 

DESCRIPTION - Disk Packer is a program which is designed 
to pack users programs into the smallest possible area 
on the disk. Users programs are read from one area of 
disk and written in another to Cause larger gaps to appear 
than would normally occur if the monitor area assignment 
process was used. The Monitor I system normally reserves 
cylinders 25 tc 80 for users programs and it is these 
cylinders that are affected by Disk Packer. Eoth the Dim 
Table and the Sequential Program Table are updated by disk 
packer after the packing operation is complete. The packing 
allows more users programs to be stored on any one disk 
than was previously possible because there are no holes 
too small to be profitably used. Disk Packer is restricted 
to a 1620 with one 1311 Disk File. The program should 
be used only in these installations which use the Monitor 
I Version I system. 



PROGRAMMING SYSTEMS - Written in SPS II- 
1. 



Monitor 1 Version 



MINIMUM SYSTEM REQUIREMENTS - A 1620 Model I or II, 20K 
memory, card I/O, Indirect Aadressing, and 1 disk drive. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016137 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOB PAGE 



Indicate "E N 1" in colunns 1-3 and the Program Number 
in columns 1-13 on the IBH Program Order Form. 



1620-01.6.138 

I9.BHRT STATEMENT COMPILES SUE80UTINE 

AUTHOES: J. E. Shapiro J. Pearson 
B. K. Neff 

DIBECT TECHNICAL INQUIBIES TC: 
J. Shapiro 

Harvard School of Public Health 
Data center 
1 Shattuck Street 

Eoston, Haas. 

DESCBIPTION - The Format Compile Subroutine enables the 
programmer to alter FOBTBAN II Version 2 format statements 
at object time. This routine is available as a library 
subroutine. The subroutine will compile all valid FOBTBAN 
II Version 2 format statements. In addition, the 
specification -NX where N is a postive integer, will compile 
correctly. The FOBTBAN II Version 2 subroutines will 
handle -NX as a specification to backspace N tines. As 
in standard FOBTBAN II, this subroutine accepts only 1 
level of inner parentheses. 

PBCGBAMMING SYSTEHS - Written in SPS, 1620-SP-020 as a 
subroutine. 

HINIMUH SYSTEM EEQUIBEMENTS - Storage used by program is 
2324 positions. Eguipment required by program - 1620 card 
system with Indirect Addressing. 

EASIC EBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE EEADABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620016138 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



I £ 2Jt£l*£ . 139 

GBADE NORMALIZING AND PLOTTING 



1620 PAGE 02 

CONTINUED FROM PRIOR COLUMN 

optionally used as a local subroutine. 

PBOGBAMHING SYSTEMS - Programmed in SPS II-D. 

MINIMUM SYSTEH REQUIREMENTS - A card system with disk file. 
Auto divide. Model I, 1443 Printer, and digital line 
plotter. Program can be used on machine with only digital 
line plotter. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATICS: PROGRAM NUMBER 1620016140 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



16 20-01.6.14 1 

DIP - DISK INSPECTION PROGRAM 



ADTHOBS: P. B. Schneider 



Fodor 



DIRECT TECHNICAL INQUIRIES TO: 

Prof. C H. Davidson, Director 
Engineering Computing Laboratory 
University of Wisconsin 
Madison, Hisconsin 53706 

DESCBIPTION - Grade Normalizing and Plotting was designed 
to perform five basic operations used by many instructors 
in the course of a semester- First, the average and standard 
deviation for any numerically graded performance (exam, 
homework, lab, report, average, etc.) can be computed. 
Second, a weighted average of any subset of a students 
grades may be made. Third, any graded performance may 
be normalized to an average and standard deviation specified 
by the user. Fourth, the output class list can be 
numerically ranked according to student performance on 
any grade or average. Fifth, a distribution for any graded 
performance or average may be plotted on the printer. 
The program is presently written so it uses three sections 
linked together with a CALL LINK statement. It could 
easily be combined into one section and be used with any 
FORTRAN what allows format statements. The alphabetic 
variable definition may need to be redefined. 

PROGRAMMING SYSTEMS - Written in FORTRAN II-D. 

MINIMUM SYSTEM REQUIREMENTS - A 60K card system with one 
1311 Disk Drive. 

EASIC PROGRAH PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - None. 

CEDERING INFORMATION: PROGRAM NUMBER 1620016139 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



!620 z 0JK6^n0 

STRAIGHT LINE PLOTTING SUBROUTINE 



AUTHOR: P.B. Armstrong 

DIRECT TECHNICAL INQUIRIES TO: 
P.B. Armstrong 
Computer Center 

Bowling Green State University 
Bowling Green, Ohio 

DESCBIPTION - DIP analyzes the Monitor I System tables 
to produce a clean, easy to read disk pack map giving 
information about, and locations of, both available and 
assigned disk areas. The DIP map shows the user what has 
been stored on the disk pack and what areas are available 
for use. DIP entries are arranged in the same sequence 
as the corresponding programs or free areas appear on the 
pack. DIP performs no diagnostics, the monitor system 
table entries must be exactly as described in the reference 
manual before DIP can operate effectively. DIP was designed 
to operate on a one file system. 

PROGEAHHING SYSTEHS - written in SPS II-D. 

HINIMOH SYSTEH BEQDIEEHENTS - Card input/output, one disk 
drive, TNF, MF, Indirect Addressing, 1620 Model I. TNF 
and MF requirement could be removed by recompiling with 
programmed subroutines. Storage used - 18,180 positions. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE EEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016141 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-01.6.142 

CAREFREE PROGRAM DUMPER 



AUTHOR: 



E. Owens 



DIRECT TECHNICAL INQUIRIES TO; 
D. E. Owens 

E.S. Preston S Associates, Ltd. 
939 Goodale Boulevard 
Columbus, Ohio 43212 



ADTHOE: P.J. Jutsum 

DIRECT TECHNICAL INQUIEIES TO: 
P.J. JutsUm 
Computing centre 
University of the West Indies 
Kingston 7, Jamaica 

DESCRIPTION - This program enables any program in store 
to be punched on cards as a self loading object deck. 
Each card in the object deck produced is numbered (except 
for the first card) , but as long as the first six and last 
four cards are in the proper positions, the bulk cf the 
object deck can be in random order. This means that if 
the deck is dropped it can be reassembled without much 
trouble. The object program may be punched in sections, 
and the resulting deck achieves the maximum economy of 
cards. 

MINIMUM SYSTEM REQUIREMENTS - The program is written for 
a Model I, 20K machine. It is compatible with Indirect 
Addressing, but does not use it, and it is readily adaptable 
to increased storage. The program occupies the lead product 
and multiplication table areas only while running. It 
replaces the table when the punching is finished, and halts 
before branching to the start of the undisturbed object 
program. 

BASIC PEOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE REAEAELE - None. 

OBDEBING INFORMATION: PEOGBAH NUMBER 1620016142 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DESCRIPTION - Straight Line Elotting Subroutine enables 
a 1620 FORTRAN program to drive a digital line plotter 
between two points. The pen status may be interrogated 
or initialized at any time by the driver program. The 
subroutine is written in SPS for use by FORTRAN under 
control of Monitor 1 on a basic 20K 1620 computer. The 
subroutine occupies only 568 core locations and may be 



1620201-6^143 

MONITOR I DISK DUMP PATCH 



Howard Givner 



DIRECT TECHNICAL INQUIRIES TO: 

Howard Givner 



CONTRIBUTED PROGRAMS 
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Office Of Testing and Research 
Brooklyn college 
Avenue B ana Bedford Avenue 
Brooklyn, N.Y. 11210 

DESCRIPTION - This program, when loaded onto a monitor 
disk pack, will permanently alter the DUP*DDUHP routine 
so that whenever card output is specified by either a 
♦outputcard or a *DDDNP Control Record, if the data to 
be outjputted is a program in system output format vhich 
does not reguire subroutines normally loaded by the 
subroutine supervisor, then the deck that is punched will 
be in the format of a self-loading SPS-020 object deck. 
Incorporating this patch enables the user of Monitor I 
to DOBG 402 when using SPS2D and then load his object deck 
independently of the monitor loader into an entirely zeroed 
memory. 

PROGRAMMING SYSTEMS - Britten in SPS. 

MINIMUM SYSTEH REQUIREMENTS - 1620 with 1622, 1311, and 
Monitor I. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM BOMBER 1620016143 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620^01. 6.J44 *H 

ShSl Z PBOCBSSOB AND REJUJjT TESTER 

AUTHOR: Janes A. Lawler 

DIRECT TECHNICAL INQUIRIES TO: 
H.B. Kerr, Director 
Tennessee Technological University 
The D.N. Hattson computer center 
Box 21a 
Cookeville, Tenn. 

DESCBIPTION - The purpose of EABT is to provide a leans 
of processing, executing and checking large volumes of 
student written a a chine language (or SPS) programs, and 
at the same time give the student a definite answer as 
to the status of their program (s) . It yields to the 
instructor a convenient means of analyzing the progress 
of each of the students. Furthermore, the students are 
given pertinent information relating to the source of their 
errors. The PART program permits wide use of mark sensing; 
however there is no reason why, as long as proper card 
formats are followed, the PART program could not be used 
with all information being hand punched and the use of 
mark sense equipment eliminated, storage used by program; 
00000 through 00400, 08000 through 20000. 

PROGRAMMING SYSTEM - Britten in SPS two pass for cards. 

MINIMUM SYSTEM REQUIREMENTS - 1620 card system with TNS, 
TNF, HF, Auto Divide, Indirect Addressing, Floating Point 
hardware, and 1620 Model I. The PART program itself does 
not use Auto Divide and Floating Point hardware, but allows 
student written programs to use these features. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016144 

Indicate M E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6^,145 

PICTURE OF DISK PACK 



CONTINUED FROM PBIOB COLUMN 

PROGRAMMING SYSTEMS - Britten in SPS II-D. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model I, 1622 Card 
Read/Punch, 1311 Disk Drive, 1443 Printer and Indirect 
Addressing. (The Indirect Addressing feature could be 
easily removed) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - Rone. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016145 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.146 

FIVE-CARD PRINTER CORE DUMP PROGRAMS 



AUTHOR: 



J.S. Taylor 



DIRECT TECHNICAL INQUIRIES TO: 
J.S. Taylor 
Data Corp. 

7500 Old Xenia Pike 
Dayton, Ohio 

DESCRIPTION - These programs dump the memory of any size. 
Three initial unformatted lines display 120 positions 
beginning at 00080, 00200 and 00300. Subsequent lines 
are formatted as follows- Starting address. Asterisk, ten 
groups of ten digits each followed by an asterisk, and 
asterisks to fill the rest of a 120 character line. On 
machines having 144 print positions, positions 121-144 
always display the same data. Only positions 00000-00079 
are destroyed by the program. The program steps on a MAR 
check when the end of core is reached. Storage used- 
0-399. 

PROGRAMMING SYSTEMS - Britten in machine language. 

MINIMUM SYSTEH REQUIREMENTS - Model I or Model II 1620 

on the 1443 Printer. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016146 

Indicate "B H 1" in columns 1-3 and the Program Number 

in columns 4-13 on the IBM Program Order Form. 



1620-01.6.147 

SUPER LISTER 



AUTHOR: 



R. L. Dunbar 



AUTHOR: 



Bisenius 



DIRECT TECBNICAL INQUIRIES TO: 
A. G. Bisenius 
Martin Marietta Corp. 
P.O. Box 179, Mail Bo. a-6632 
Denver, Colo. 

DESCRIPTION - This program causes four lists describing 
the contents of the disk pack to be printed out. The first 
two lists pertain to named non-system programs and will 
be in alphabetic and DIM number order. The third list 
is in cylinder order and covers cylinders 24 through 99. 
The fourth list gives the unnamed DIB numbers. Each item 
in the first three lists contains the following information 
when it exists. Cylinder number, DIM number, program name, 
memory address to which the program will be loaded, memory 
address where the program will be entered, the beginning 
and ending sector locations, the number of sectors used 
or available, a minus or plus sign depicting whether the 
sectors were used or available, and a comment on protection 
and permanence. 

This program is set up for handling a disk pack with sector 
addresses 00000 through 19999 and the disk pack must have 
equivalence, DIM and sequential tables. 



DIRECT TECHNICAL INQUIRIES TO: 
R. L. Dunbar 
Sunset Trailer Park 
Oswego, H.Y. 

DESCRIPTION - Under sense switch control, operator may 
read out FORTRAN, SPS, 80 columns of machine language, 
or print any number of fields from a single card, in any 

order, in tabular form. Fields to be listed may be 
specified by a prepared format card or entered on the 
console typewriter. Lister is considerably faster than 
those available, and prints record marks in both 
alphanumeric and numeric fields. 

PROGRAMMING SYSTEMS - Britten in NCE. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 Model 1 with card 
I/O and Indirect Addressing is reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016147 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.148 



MULTIPOINT PLOTTER 



AUTHOR: 



G. Gates, Jr. 



DIRECT TECHNICAL INQUIRIES TO: 
R. Gates, Jr. 
University of Delaware 
Computing Center 
Newark, Delaware 19711 

DESCRIPTION - The purpose of the Multipoint Plotter is 
to accept data in the form of independent points, each 
data point being given by its X and Y coordinates, scale 
the data, and plot it on cards. Each data point may be 
given a separate symbol, data need not be presorted and 
scaling may be controlled by the user if desired. 



CONTRIBUTED PBOGRAMS 
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Specifications - Subroutines VAFF1F and VAFP2F (Program 
Number 13.0.010) Bust be in the library deck or on a disk. 

PROGRAMMING SYSTEMS - Written in FORTRAN II with SPS 

Subroutines VAFP1F and VAFP2F. 

MINIMUM system REQUIREMENTS - Storage usea is 40K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM BOMBER 1620016148 

Indicate W E N 1" in columns 1-3 and the Program Number 
in columns 4—1 3 on the IBM Prograa Order Form. 



J620 Z 0_U6.J149 

£12111 - DATA. MANIPULATION 



AUTHOR: 



J. L. Barnard 



DIRECT TECHNICAL IBQOIRIES TC: 
J. L. Barnard 

Louisiana Polytechnic Institute 
Louisiana Tech. Computing Center 
Huston, La. 71270 

DESCRIPTION - To read intonation from a predetermined 
nuiber of cards, arrange the infornation in any desired 
format, ana print the intonation in any predetermined 
nuiber of lines. Storage specifications - 7346 core 
positions. Type of program - complete mainline program. 

PROGRAMMING SYSTEMS - Source language is SPS II-D. 

HINIHDH SYSTEM REQUIREMENTS - Assembled on 1620 Model I 
with 1311 Disk Drive, 1443 Printer, 1623 Core Storage, 
and card I/O. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016149 

Indicate "E N 1" in columns 1-3 ana the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTINUED FROM PRIOR COLUMN 

assume a three disk drive system with the Monitor System 
on one pack, the work area on a second and the free area 
on a third. The assumption is also made that all disk 
packs have sector addresses 00000 to 19999. 

PROGRAMMING SYSTEMS - Written in FORTRAN II-E. 

MINIMUM SYSTEM REQUIREMENTS - Program requires a 1620 
system with three disk drives, although with modification, 
it can be run en a system with two drives. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016151 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Prograa Order Form. 



TRUTH TABLES IpJ SYM BOLI C LOGIC STATEMENTS 

author: J. K. Bard 

DIRECT TECHNICAL INQUIRIES TO: 
J. K. Hard 
Westminster college 
Fulton, Mo. 

DESCRIPTION - This program accepts a logical statement 

up to 79 spaces long, containing up to 24 variables, and 

prints out the Truth Table, instructions are included 

for compiling with 1620/1710 SPS. Object tapes are included 

for both systems. Card input would require the change 

of one card instruction included in the write-up. 

PROGRAMMING SYSTEMS - Written in SPS II-D. 

MINIMUM SYSTEH REQUIREMENTS - Program requires a paper 
tape, disk file system with Indirect Addressing and 6142 
positions of storage. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate aaterial delivered. 
OPTIONAL PROGRAM PACKAGE - None. 
ORDERING INFORMATION: PROGRAM NUMBER 1620016152 



1620Z0JU6.150 

DISK PACKER FpJMONITOR II 



PROGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



AUTHOR: 



D. Moser 



DIRECT TECHNICAL INQUIRIES TO: 
Prof. C H. Davidson 
Director Engineering Computing Lab. 
University of Wisconsin 
Madison, Wise. 53706 

DESCRIPTION - Disk Packer is a program written in SPS II- 
D (Monitor II) which is designed to pack users programs 
into the smallest possible area on the disk. Users programs 
are read froa one area of disk and written in another to 
cause larger gaps to appear than would normally occur if 
the monitor area assignment process was used. The Monitor 
II system normally reserves cylinder 25 to 78 for users 
programs and it is these cylinders that are affected by 
Disk Packer. Both the DIM Table and the Seguential Program 
Table are updated by Disk Packer after the packing operation 
is complete. The packing allows more users programs to 
be stored on any one aisk than was previously possible 
because there are no holes too small to be profitably used. 

PROGRAMMING SYSTEMS - Written in SPS II-D. 

MINIMUM SYSTEH REQUIREMENTS - Disk Packer is restricted 

to a 1620 Model I or II with one 1311 Disk File, 20K memory, 

card I/O and Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 



BASIC none 
OPTIONAL none 



PT 
none 



none 
none 



1620^01^6.153 

TABLE LOOKUP*. NO BRANCH AND TRANSMIT - iTLUNBTl 

AUTHORS: T. Noyes D. Hann 

DIRECT TECHNICAL INQUIRIES TO: 
T. Noyes 

c/o Computer Center 
Oakland University 
Rochester, Mich. 

DESCRIPTION - TLUNBT is a binary table search of a core 
stored table. Given a search argument, TLUNBT finds the 
associated entry of a table with ascending arguments. .. 
The table must have ascending arguments. A table may not 
contain more than 999 entries. The arguments must be at 
least two digits in length. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Program requires a 1620 Model 
I with 1200 positions of storage and Indirect Addressing. 
BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 



ORDERING INFORMATION: PROGRAM NUMBER 1620016150 



Indicate "E 
in columns 



N 1" in columns 1-3 ana the Program Number 
-13 on the IBM Program Order Form. 



ORDERING INFORMATION: PROGRAM NUMBER 1620016153 



Indicate "8 N 1 M in columns 1-3 and the Prograa Number 
in columns 4-13 on the IBM Program order Form. 



J 620 = 0J .6.151 

FORTRAN II^D DISK SU 

THE WORK AREA 



lEOUTINES TO BEAD CR WHITE IN OTHER THAN 



16 20^01^.6.154 

FRAME SUBROUTINE 



AOTHOR: 



L. Wright 



DIRECT TECHNICAL INQUIRIES TC: 
D. L. Wright 
Georgetown University 
Computation Center 
Washington, D.C. 

DESCRIPTION - The purpose of these two subroutines is to 
allow a FORTRAN program to store or retrieve data on a 
disk pack outside the monitor work area. The subroutines 



AUTHORS: 



Juell D. G. Olson 



DIBECT TECHNICAL INQUIRIES TO: 
P. Juell 

North Dakota State University 
Fargo, N.D. 

DESCRIPTION - This subroutine provides the ability to edit 
output data in a FORTRAN program into a common business 
type format. This includes the addition of commas dollar 
signs, blanks, and other special characters into output 
numbers. The length of the number plus editing characters 



CONTRIBUTED PROGBAMS 



1620 
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cannot exceed ten(10) positions. Special Kingston FOBTBAN 
II statements are used so this subroutine is restricted 
for use only with the Kingston FORTRAN II Coapiler and 
subroutines. Each number edited takes approximately one 
(1) second of computer time. 

EBCGBAMMING SYSTEMS - Written in FOBTBAN II. 



CONTINUED FBOM PBICB COLUMN 

systems using monitor I which do not have these features. 

PBOGBAHMING SYSTEMS - PSS-II-D under the Monitor System. 

MINIMUM SYSTEM REQUIREMENTS - Routines were developed on 
a 1620 Model I with 20K. Any 1620 capable of using Monitor 
I can use these routines. 



MINIMUM SYSTEM REQUIBEMEBTS - The program requires a 40K 
1620 system with Auto Divide and TNS-TNF-HF. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

OBDEBIHG INFOBMATICN: PBOGBAM NUMBEB 1620016154 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBING INFOBMATION: PBOGBAM NUMBEB 1620016157 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^1^.6^58 
DISK DUMP 



1620-0JU6-155 

GETAG SYSTEM 

AUTHOR: 1. J. Noyes 

DIRECT TECHNICAL INQUIBIES TO: 
T. J. Noyes 
Computer Center 
Oakland University 
Rochester, Mich. 

DESCRIPTION - The GETAG System is a package of programs 
designed to allow the user direct access to randomly stored 
disk file. Seven programs comprise the system. Three 

- STOTAG, GENTAG, and GETAG2 are mainline. The other four 

- GETAG1, GETAGM, GETAGA, and GETAGB, are relocatable 
subroutines. A tag file of the users disk file is formed 
sort, and STOTAG executed to build an index file. Then 
the user uses GETAG1 or GETAGM, which use the tag and index 
files, as subroutine to access the disk file. The tag 
file must not exceed one disk pack. 

PBOGBBMMING SYSTEMS - written in SPS II-D. 

MINIMUM SYSTEM BEQUIREMENTS - 1620 I, 20K card - disk file 
system, any number of packs, TNS, TNF, and Indirect 
Addressing. The users system must also have the 1620 
library program, sort, and a 1620 Users Group Program, 
TLUNBT (Program No. 01.6.153). 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE BEADABLE - None. 

OBDEBING INFOBMATION: PBOGBAM NUMBEB 1620016155 

Indicate "E! N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Erogram order Form. 



1620_z0_li6...156 
INVENT 



AUTHOR: R. P. Erisard 

DIRECT TECHNICAL INQUIRIES TO: 
R. P. Frisard 

Louisiana Polytechnic Institute 
Computing Center 
Buston, La. 71270 

DESCRIPTION - Disk to printer sector dump using 3090 core 
positions. 

PROGRAMMING SYSTEMS - Written in SPS II D. 

MINIMUM SYSTEM REQUIREMENTS - Card input, typewriter input, 
1442 Printer and a 1311 Disk Drive. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE BEADABLE - None. 
OBDEBING INFOBMATION: PROGRAM NUMBER 1620016158 

Indicate "B N 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^01.6^.159 

TNS^. TNF^ AND MF SIMULATION SUBROUTINES 



AUTHOR: 



Oneal 



DIRECT TECHNICAL INQUIRIES TO: 
T. W. Oneal 

Scientific Computation Facility 
Loma Linda University 
Loma Linda, Calif. 92354 

DESCRIPTION - Invent lists the user written programs and/or 
monitor programs and/or available disk areas of all drives 
defined under Monitor. The listing may be sequential from 
drive "0" (zero) to the last drive or may be sorted, 
alphabetically for programs and numerically for available 
areas. 

PBOGRAHMING SYSTEHS - Written in SPS II-E. 

MINIMUM SYSTEM REQUIREMENTS - Requires a 20K card disk 
system with one 1311 Disk Drive, TNF, Auto Divide and 
Indirect Addressing. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOBMATION: PROGRAM NUMBER 1620016156 . 

Indicate "E N 1 n in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.157 

INS A TSF AND MF MACBO SUBROUTINES 



DIBECT TECHNICAL INQUIRIES TO: 
J. D. Rose 

California State College at Hayward 
Instructional Computation center 
25800 Hillary Street 
Hayward, Calif. 94542 

DESCRIPTION - These subroutines simulate the TNS, TNF, 
and MF instructions, and have a simple linkage designed 
to facilitate modification of SPS programs written for 
machines equipped with the special feature hardware. These 
subroutines require less core storage than those of 1620- 
01.6.121; the known execution errors of the TNS subroutine 
of 1620-01.6.121 have been corrected, and MF simulation 
is included. The subroutines may be used individually 
or in any combination, are written in SPS, and occupy a 
total of 392-394 core positions when assembled 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Any 1620 card system with 
Indirect Addressing may be used. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOBMATICN: PROGRAM NUMBER 1620016159 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-01.6.160 



AUTHOR: 



A REPORT GENERATOR 



Strunk 



AUTHOR: 



P. Cantlin 



DIRECT TECHNICAL INQUIBIES TO: 
D. Crowe 
3141 Killarney 
Costa Mesa, Calif. 92626 

DESCRIPTION - These Macro Instructions allow a programmer 
to simulate the TNS, TNF and MF eait instructions for 1620 



DIRECT TECHNICAL INQUIRIES TO: 
B. C. Strunk 
Xavier University 
Cincinnati, Ohio 

DESCBIPTION - LABEIR is a data handling one-pass compiler. 
It has very low powered arithmetic and decision-making 
capabilities but very fast and powerful data novement 
instructions. The purpose of this program is to — A) 
read in a variable number of input records (cards) , B) 
arrange and edit the data from these cards into output 
lines, C) add constants and titles to this data, E) print 
and/or punch and/or type these prepared lines, and E) count 
cards, card sets, output lines, sets of lines, pages. 
This program will simulate all of the operations cf an 
IBM 024, most of the operations of an IBM 514, many of 
the operations of an IBM 407, and a few of the operations 
of an IBM 085- Execution times are as flexible as the 



CONTRIBUTED PROGRAMS 



CONTINUED FEOM PBIOH PAGE 



CONTINUED FROM PRIOR COLUMN 



programmer. A program to print four-line labels, four- 
up across a page, one label per card will require about 
one minute to compile and sill print 250 labels per minute 
(fast I/O equipment). This program is capable of being 
operated either under Monitor control (version A) or by 
means of its own card loader (version B) . Standard material 
consists of all listings and all documentation; the four 
object decks supplied consist of both version A and version 
B of the compiler and of the Program Executor, both for 
use on any 1620-20K card system with Indirect Addressing. 
Optional material consists of four SPS-IID source decks 
corresponding to the four object decks. Directions are 
included for altering the source decks to utilize any 
additional core storage available. 

PROGRAMMING SYSTEMS - The LABELS language is more user- 
oriented than FORTRAN while its execution times approach 
those of SPS. The LABELR system consists of, two core 
loads; a Compiler and a Program Executor. The entire 
system is capable of being operated on any 1620-1 or 1620- 
II card system with Indirect Addressing. 

MINIMUM SXSTEB REQUIREMENTS - The system will use any model 
1311, 1621, 1622, 1627, and/or 1443 attached to the 1620. 
Floating Point hardware. Automatic Divide, and additional 
instructions are not reguired. The program will operate 
with no limitations in 40-K, minor limitations in 20-K. 
The entire system will operate on a 360/20 1620 Emulator 
without modification. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Object code and sample problem. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Source code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620016160 



PROGRAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 

REQUIREMENT 



The processor uses about 18K, thus leaving about 22K for 
the compiled object program in a 40K machine. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBCGRAM NUMBER 1620020009 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns (1-13 on the IBM Program Order Form. 



1620-02^.0^.01^ *m 

INTERPRETIVE SYSTEM FOR PERFORMING OPERATIONS WITH COMPL EX 

NUMBERS 

AUTHORS: W.D. Glauz J.O. Hancock 

DIRECT TECHNICAL INQUIRIES TO: 
H.D. Glauz 
Purdue University 

Sch. of Aeronautical S Engr. Sciences 
Lafayette, Indiana 

DESCRIPTION - The program performs various operations with 
complex numbers. It is written as an interpretive system 
which interprets OP Codes 80-99 and performs the indicated 
operation with Floating Point numbers. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620020011 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



BASIC none 
OPTIONAL none 



1620-02.0.014 

FORTRAN~90 COMPILER AND SUBROUTINES 



1620-02.0.0 



LOAD AND GO FOFTEAJ 



AUTHORS: C. 8. McClure 
J. Davis 



K. Sanderson 



DIRECT TECHNICAL INQUIRIES TO: 
C. N. McClure 

Engineering Computing Laboratory 
University of Wisconsin 
Madison 6, Wisconsin 

DESCRIPTION - This program converts source programs written 
in FORTRAN Language into a pseudo-machine language coding 
which is then executed without intermediate punchout is 
a simple interpretive mode. This program is designed as 
an educational programming system with very extensive 
diagnostic and tracing features. 

MINIMUM SYSTEM REQUIREMENTS - The minimum memory is 40K. 
The processor uses about 35K, thus leaving only 5K for 
the compiled object program in a 40K machine. 1620 Central 
Processing Unit, 1622 Card Read-Punch Unit, 1623 Core 
Storeage Unit, Indirect Addressing and Automatic Divide. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 
MACHINE READABLE - Appropriate 



AUTHOR: Richard Eorst 

DIRECT TECHNICAL INQUIRIES TO: 
Richard Borst 
Bausch S Lomb Optical Co. 
Computing Section 
635 St. Paul Street 
Rochester, N.Y. 

DESCRIPTION - Modified Format FORTRAN Compiler, allowing 
the input flexibility of the old FORTRAN without format, 
with the advantages of format output. FORTRAN 90 also 
contains procedure for correcting source errors during 
compilation. Subroutine deck also contains an Absolute 
Value Subroutine — AVS. 

MINIMUM SYSTEM REQUIREMENTS - Card system, memory 20K, 
Automatic Divide, Indirect Addressing and other special 
feature required - MF. 

BASIC PROGRA- PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620020014 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



laterial delivered. 



OPTIONAL EROGRAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Appropriate material delivered. 

ORDERING INFORMATION: PROGRAM NUMBEE 1620020008 



1620-02.0.017 

OTO FORTRAN PROCESSOR AND SUBROUTINES 



PROGRAM NUMBEE 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



EASIC none 
OPTIONAL none 



CARDS 
CARDS 



15 
15 



USER VOLUME 
REQUIREMENT 



none 
none 



.1620^02.. .0.009 

lOlzIPzGO XI PASS F0RG01 



AUTHORS: C.W. McClure 
J. Davis 



K.R. Sanderson 



DIRECT TECHNICAL INQUIRIES TO: 

Professor OH. Davidson 
Engineering Computing Laboratory 
University of Wisconsin 
Madison 6, Wisconsin 

DESCRIPTION - This program is designed to retain most of 
the desirable features of FORGO, but to allow larger 
programs tc be processed by a two-pass operation. 

MINIMUM SYSTEM REQUIREMENTS - The minimum memory is 40K. 



AUTHORS: 



E. Stewart Lee 



James A. Field 



DIRECT TECHNICAL INQUIRIES TO: 

James A. Field 
University of Toronto 
Electrical Engineering Department 
Toronto, Ontario, Canada 

DESCRIPTION - A FORTRAN compiler with rapid, batch 
compiling, and additional language facilities. Improvements 
have also been made in the subroutine package. 

PROGRAMMING SYSTEMS - The language is an extension of IBM 
Format FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, and no special 
features reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620020017 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGBAHS 



16 20^02.0.. e29 

HCE LOAD AMD GO FORTRAN FOB 20K 

AUTHORS: George Rumrill Brace Fowler 

DIBECT TECHNICAL INQUIRIES TC: 
George Bant ill 
Conputing Center 
Newark College of Engineering 
323 High St. 
Newark 2, N.J. 

DESCRIPTION - This prograa is a compiler-interpreter capable 
of batch processing source decks written in a modified 
form of the FORTRAN Language. Answers are immediately 
available without any handling of object decks. The program 
is intended to bring to the user of the 20K 1620 the 
advantages of load and go operation, especially when 
processing short student programs. Cannot be damaged by 
errors in programs. Hany error checks are made, both 
during compilation and execution. No format specifications 
are used. Output format is determined by the type and 
range of the variable, input format is free form. 

FEATURES - Built-in trace, array input and output, provision 
for sub-program linkages, limited Hollerith listing, and 
undefined variable detection. Specifications-A. 

PROGRAMMING SYSTEMS - Other programming language OSAP (Ohio 
State University Assembly Program) , a modified form of 
SPS library No. 01.1.012. 

MINIMUM SYSTEM REQUIREMENTS - Storage used by program- 
20,000 positions. Equipment required by program - Auto 
Divide, Indirect Addressing, card or paper tape, not both; 
Model I machines only. 

BASIC PROGRAM PACKAGE 

EOCUHENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - Hone. 
MACHINE READABLE - Source code. 



*I 1620-02.0.03 1 

PDfi IPJIHAJ 4AN INTERPRETIVE PROGRAM) 



AUTHOR: 



Frank B. Maskiell 



ORDERING INFORMATION: PROGRAM NUMBER 1620020029 



PROGRAM NUMBEB 
EXTENSION 



EASIC none 
OPTIONAL none 



DISTRIBUTIOK MEDIUM 
TYPE CODE 



DTB* 
CARDS 



USER VOLUME 
REQUIREMENT 



none 
none 



I620::02 J .0..030 

ABSOLUTE ASSEMBLY SYSTEM 7094 FAP JFOR THE IBM .1620 DIGITAL 
CO MP UTERI 

AUTHOR: r. M. Halinoski 

DIBECT TECHNICAL INQUIRIES TO: 
B. H. Halinoski 
HRE-Singer, Inc. 
Science Park 
P.O. BOX 60 
State College, Pa. 

DESCRIPTION - This system is designed to assemble FAP 
Language instructions written for the IBM 7094. Its primary 
purpose is to aid users of the 1620 who also use the 7094, 
but do not have as much access to the 7094. It may also 
be used for debugging 7094 programs in that it performs 
some logical checks which are not performed by the 7094 
FAP Assembler. Bestrictions/range - this system makes 
the following major restrictions on the 7094 source deck: 
symbolic names longer than six characters are not 
acceptable-logical tag designations are unacceptable, 
relocatable pseudo-operations are unacceptable, literals 
are unacceptable, address or decrement arithmetic is 
restricted to the operations + and -, and the source deck 
cannot contain more than 947 symbolic names. There are 
other minor restrictions which are specified in the program 
manual. Storage requirements- Phase I of this system 
reguires 23895 locations for the program and arithmetic 
table, the remainder of the core is used for the symbol 
table. Phase II of this system requires 01616 locations 
for the program and arithmetic tables. Phase III of this 
system requires 03038 for the program and arithmetic tables- 
the remainder of the core is used for the assembly of the 
post-processor output. 

PROGRAMMING SYSTEMS - The program is written in the SPS 
Language and does all calculations in fixed point. 

MINIMUM SYSTEM REQUIREMENTS - 40K, Automatic Divide, 
indirect Addressing, other special features required- TNF, 

TNS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620020030 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIBECT TECHNICAL INQUIRIES TO: 
Frank H. Maskiell 
Pennsylvania Transformer Division 
HcGraw-Edison Company 
Canonsburg, Pa. 

DESCRIPTION - PDQ FORTRAN is a modification of the 0T0 
FORTRAN and FORTRAN with FOBMAT, which utilizes floating 
point variables in the excess 50 notation. In the hundred 
plus programs compiled to date by the system, the object 
tine running is less, the size of the object deck is 
smaller, and core storage requirements for the object 
program, subroutines, and data is less than any other 
FORTRAN system without Floating Point hardware. 
Specifications - Storage used by program - the Processor 
requires 18008 digits permitting 199 Symbol Table entries 
on 20K, 2199 Symbol Table entries on 40K. Class A 
subroutines for the object program require 6600 digits. 
Instructions of the object program begin loading in location 
6600. 

The FO-004 Language has been expanded in the PDQ FORTRAN 
System to include (a) Common statement for reserving 
locations in the symbol table for nonsubscripted and 
subscripted variables, (b) Batch compilation of programs 
without subroutines, (c) continuation cards for format 
and input/output statements, (d) Repetition of field format 
(HFW.D) etc. — Format also includes an A and A D 
specification, (e) Listing or punching of referenced source 
statements and symbol table, (f) Procedure statements 
permitting a group of FORTRAN statements to be utilized 
as a subroutine similar to the FORTRAN II subroutine 
subprogram, (g) Trace facility without generating additional 
instructions in line and including the address as well 
as the magnitude of the variable at running time, — The 
format of trace at object time may be altered by a single 
instruction, (h) Two subroutine decks, one permitting a 
relaxed input format requiring only that a space or blank 
column separate input variables, and the second requiring 
input data to be in the precise format of the input 
statements- — Either subroutine deck may be used with the 
compiled object program depending on the format of data 
to be used. 

PROGRAMMING SYSTEMS - Britten in SPS and then compressed. 

MINIMUM SYSTEM REQUIREMENTS - Card system- Auto Divide. 
Program will operate on 20K and will internally adjust 
for any additional storage available. Programs may be 
compiled on a machine of 40K or greater, for a machine 
of lesser capacity by means of a control digit. Any program 
in FO-004 language may be compiled in the system, however, 
additional language facilities are included. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 



ORDERING INFORMATION: PROGRAM NUMBER 1620020031 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTB* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620-02^0^035 * 

CARLETON BINARY SIMULATOB 

AUTHOB: William Gage 

DIRECT TECHNICAL INQUIRIES TO: 
William Gage 
Computation Center 
Carletcn College 
Northfield, Minn. 

DESCBIPTION - The Carleton Binary Simulator is an 
interpretive program which converts the 1620 into a single 
address, fixed work length, binary computer. It has 4096 
words of 16 bits (15 bits and sign) each, a 32 bit 
Accunulatpr-Bemainder Unit, and a 12-bit Index Register. 
There is a generous supply of arithmetic. Boolean, control, 
and input/output instructions. 

PBOGBAMHING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - 20K machine conf iguration- 
card system. Indirect Addressing, Edit Instructions (HF, 
TNS, TNF), Automatic Divide. The program can be fairly 
easily modified for use on machines without the edit 
instructions. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBEB 1620020035 



Indicate M B N 1" in columns 1-3 and the Program Number 



CONTRIBUTED PBOGRAMS 



CONTINUED FBOM PRIOR PAGE 

in columns 4-13 on the IBM Program Order Form. 



1620 = 02^£.J36 

BG-UTO FORTRAN 



AUTHOR: 



Werner Frank 



DIRECT TECHNICAL IHQOIBIES TO: 
Werner Frank 
Computer Center 
Bowling Green St. Univ. 
Bowling Green, Ohio 

DESCRIPTION - This program is a modification of the DTO 
FORTRAN Compiler (02.0.021) to permit a series of separate 
FORTRAN object programs that have been compiled without 
the relocatable subroutines to be run without reloading 
of the subroutine deck for each progran. All relocatable 
subroutines have been assigned a permanent location in 
memory immediately above the arithmetic and input output 
subroutines. All subroutines are loaded once in memory 
at object time and then any number of compiled object 
programs may be run without individually reloading the 
subroutines. All statements acceptable in the original 
version of DTO FORTRAN are acceptable in BG-DTO FOBTBAB. 
This program has been found to be especially suitable for 
compiling and running many short student FOBTBAB programs 
on a 20K machine. 

PBOGBAMMISG SYSTEMS - Mainline complete. 

MINIMUM SYSTEM BEQOIBEHEBTS - Card system. Language used 
in the writeup- English. If all relocatable subroutines 
are permanently stored in memory, the origin of object 
programs is 11120. In order to compile and run larger 
object programs, the origin may he reduced to 09100 by 
eliminating the trigonometric and sign subroutines, or 
to 08466 by eliminating all but the exponential and log 
subroutines. These last two subroutines must be retained 
since they are used in evaluating A**B. 

BASIC PBOGBAH PACKAGE 

COCDMEBTATIOB - write-up on Microfiche only. 

MACHINE READABLE - None. 

GBDEBIBG IBFOBMATIOB: PROGRAM BDHBER 1620020036 

Indicate "B B 1" in columns 1-3 and the Program Bumber 
in columns 4-13 on the IBM Program Order Form. 



16 20-02. 0.237 

SIMULATION OF THE IBM 7040/7044 CB THE IEM 1620 



AUTHOR: 



William E. aright 



DIBECT TECBMICAL INQUIRIES TO: 
E. Robert Ashworth 
C.P. 6 Computing Center 
Southern Illinois Oniv. 
Carbondale, 111. 

DBSCBIPTIOB - The 7040 simulator reads in programs written 
in a limited 7040 Macro Assembly Progran (MAP) Language, 
converts each program to a machine language representation, 
and uses these representations to execute the programs 
as would an IBM 7040. The groups of instructions which 
are not legal are- (1) Trapping Instructions, (2) Double- 
Precision Floating Point Instructions, (3) Memory Protect 
Instructions, (4) Input-Output Instruction, {5} Direct 
Data Connection Instructions, all HAP. Pseudo-Instructions 
except OCT, DEC, BCI, ESS, BIS, OBG, END, and EQU. The 
7040 core storage is limited to a maximum of between 1,009 
words and 2,705 words. 

PROGRAMMING SYSTEMS - Written in SPS Mainline complete. 

MINIMUM SYSTEM REQUIREMENTS - 40K. Equipment required 
by program - Card system, TNS, TNF, MF, Auto Divide, 
Indirect Addressing, Floating Point hardware. Program 
can be used on lesser machine. Requirements that can be 
easily removed- 40K, TBF. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFCRMATIOB: PROGRAM BUMBEB 1620020037 

Indicate n B B 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16203 02.0^038 

CARLJTCN COLLEGE COMPILER 



COBTIBUED FBOM PRIOB COLUMN 

Addressing and Additional Instructions. Compilation and 
execution are fast, and batch operation is handled quickly. 
The language includes the usual 4-digit fixed-point, 10- 
digit mantissa floating-point, and elementary function 
arithmetic. In addition, there are double precision. 
Boolean, maximum-minimum, and remainder operations. 
Subroutine calls are allowed and flexible alphameric typed 
output is available. There is also the capability of 
compiling 1620 Absolute instructions. The entire compiler 
occupies 8-11K of core. Source statements are thoroughly 
checked for legality during compilation. The source program 
listing conveys much useful information about the object 
program. 

PBOGBAHMING SYSTEMS - Written in SPS, Mainline complete. 

MINIMUM SYSTEM REQUIREMENTS - 20K card system, TNS, TBF, 
MF, Auto Divide, Indirect Addressing, Floating Point 
hardware. Columns 107 of the last card of the object deck 
(deck 1) must be modified so as to contain 3200100. This 
compiler, with suitable modifications, may be used on 40 
or 60K machines. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING IBFOBMATIOB: PBOGBAM BUMBER 1620020038 

Indicate M B B 1" in columns 1-3 and the Progran Number 
in columns 4-13 en the IBM Program Order Form. 



1620 z 02..0-039 

CARLETON sps 



AUTHOR: W. R. Gage 

DIRECT TECHNICAL INQUIRIES TO: 
W. B. Gage 
Carleton College 
Borthf ield , Minnesota 



DESCBIPTION - Carleton SPS is a modification of IEM SPS 
with increased speed and symbol table room. Storage used 
by program - 16K plus 4K for symbol table. 

PROGRAMMING SYSTEMS - SPS, Mainline, Complete. 

MINIMUM SYSTEM REQUIREMENTS - Equipment required by program 
is card system. Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERIBG IBFOBMATIOB: PBOGRAM BUMBER 1620020039 

Indicate "B B 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^02.0^043 
FORGO-D 



AUTHOR: 



Alan Purcell 



AUTHOR: 



H. Taranto 



DIRECT TECHBICAL INQUIRIES TO: 
D. H. Taranto 
Carleton College 
Northfield, Minnesota 

DESCRIPTION - The Carleton College Compiler is a load-ana- 
go algebraic compiler designed especially for the 20K, 
Automatic Floating-Point card system with Indirect 



DIRECT TECHNICAL INQUIBIES TO: 

Prof. C. H. Davidson, Director 
University of Wisconsin 
Engineering Computing Laboratory 
Madison, Wisconsin 53706 

DESCRIPTION - This allows the running of FORGO under Monitor 
I control. The modified Monitor has complete compatibility 
with Monitor I and the modified supervisor recognizes 
control cards for FORGO and transfers control to FORGO 
whenever specified. Control is returned to the supervisor 
whenever a job card is encountered. Storage - 40K or 
larger (self adjusting) . This is an adaption of FORGO 
02.0.008. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Card system, 1 disk drive. 
Automatic Divide, Indirect Addressing. 

BASIC PBOGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBEB 1620020043 

Indicate M B N 1" in eclumns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620^02^0^044 

ALGOL 



F. Blose 
Jones 

T. Bright 
D. Bryant 



D. Rector 

S. Pope 

w. Wright 

K. Beyler 



DIRECT TECHNICAL INQUIRIES TO: 



CONTRIBUTED PROGEAMS 
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E. B. Ashworth 

Data Processing and Computing center 
southern Illinois University 
Carbondale, Illinois 

DESCBIPTJON - 1620 ALGOL is the full ALGOL 60 less own 
arrays, integer labels, and a few other restrictions imposed 
on the system by the character set and 40K memory positions 
of the IEH 1620. Storage used by program - 40K. 

PROGRAMMING SYSTEMS - Written in SPS. 

HINIMUH SYSTEM REQUIREMENTS - Card system, TNS, TNF, BF, 

Auto Divide, Indirect Addressing, Floating Point hardware. 

Beguirenents which can be easily removed - THS, TNF, 
Floating Point hardware. 

BASIC PBOGBAH PACKAGE 

DOCDHENTATION - Write-up on Microfiche only. 

MACHINE BEADABLE - None. 

OBDEBING INFORMATION: PBOGBAH NUHBEB 1620020044 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



SUPEE Z G0 FORTRAN PBOCESSOB 

AUTHOR: E. S. Eikenberry 

DIRECT TECHNICAL INQUIRIES TO: 

R. S. Eikenberry 
Dept. of Aeronautical Eng. 
University of Notre Dame 
Notre Dame, Ind. 

DESCRIPTION - The Super-Go System is a major modification 
of FORTRAN with Format featuring ease of operation and 
extended FORTRAN capability. Load and go or object deck. 
Processing of stacked programs entirely automatic by means 
of simple control cards. Under control card option are 
(program listing) trace compilation (load and go or object 
deck) . Program listing and trace are punched. Trace 
includes statement address. Undefined variables detected 
and address given. Object decks are comparable in size 
with source deck. Program origins (load and go 29238/object 
deck 07600 or 29238) . Additional FORTRAN features (optional 
free style input) optional fixed format output (full FORTRAN 
II Format) indexed I/O Statements (call and subroutine 
statements) . 

PBOGBAHMING SYSTEMS - Written in AFIT SPS. 

MINIMUM SYSTEM REQUIREHENTS - 1622 Cari Beader-Punch, 
memory of at least 40K Floating Point hardware. Indirect 
Addressing, MF-TNF-TNS. storage used by program - All 
available. Eguipnent required by program - Card system, 
TNS, TNF, HF, Auto Divide, Indirect Addressing, Floating 
Point hardware, at least 40K memory; self adjusting for 
60K. 

Note - AFIT SPS Processor No. 01.1.023 must be used for 
assembly. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBING INFCBHATION: PROGRAM NUMBER 1620020045 

Indicate "£ N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-02.0.046 

izM IOSMO/FORTSAN OF ROLLA MISSOURI 

AUTHOR: H. R. Alcorn 

DIRECT TECHNICAL INQUIRIES TO: 
H. R. Alcorn 
University of Missouri 
Computer Science Center 
Rolla, Missouri 

DESCRIPTION - FORMO is a load-and-go, batch operation 
educational programming system which accepts FORTRAN type 
source programs. The system is strictly card oriented, 
hovever, console operations may be performed by first 
setting an internal control digit. Error messages referring 
to the original source statement. in error are produced 
at either compile or execution time depending upon the 
nature of the error. This system makes use of Floating 
Point hardware and Special Instructions. Storage used 
by program - 31590 digits. Compiled program and symbol 
table use the rest of available memory. 



CONTINUED FROM PRIOR CCLDMN 

MACHINE READABLE - None. 

OBDEBING INFOBMATION: PBOGRAH NUMBER 1620020046 

Indicate "B N 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^02.0^047 

WITRAN - A LOAD AND GO FORTRAN SYSTEM 



AUTHORS:*' D. S. Henderson P. Doepel 

DIRECT TECHNICAL INQUIRIES TO: 
D. S. Henderson 
Computing Centre 
University of the witwatersrand 
Johannesburg, South Africa 

DESCBIPTIOH - This is a load-and-go system whose source 
language is a modification of FOBTBAN, and whose object 
language consists of a string of two ana three aigit 
syllables, which are interpreted by the 1620. A WITBAN 
object program is approximately 2/7 the length of the 
corresponding conventional program. This advantage is 
paid for by an operating time penalty of the order 2-1, 
compared with FO-004 FORTRAN. Compilation times are at 
least twice as rapid as conventional systems. 

PBOGBAHMING SYSTEMS - Written in FOBTRAN with Format. 

MINIMUM SYSTEM REQUIREMENTS - A 16K 1620 card system with 
Auto Divide and Indirect Addressing. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE BEADABLE - Appropriate material delivered. 

OPTIONAL PBOGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGBAM NUMBER 1620020047 

PROGEAM NUMBER DISTRIBUTION HEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



OPTIONAL none 



1620;:£iUiL.049 

PDQ THIRD ALTERNATE SUBROUTINE 



AUTHOB: 



H. W. Kidder 



Written in SPS 162E/1710 - Mainline 



PROGRAMMING SYSTEMS 
Complete. 

MINIMUM SYSTEM REQUIBEMENTS - Card system, TNS, TNF, MF, 
Auto Divide, Indirect Addressing, Floating Point Hardware. 
Automatically adjusts to all of the memory, 40K or greater. 

BASIC PBOGRAH PACKAGE 

DOCUHENTATION - Write-up on Hicrofiche only. 



DIRECT TECHNICAL INQUIRIES TO: 
H. W. Kidaer 
8. w. Eeck S Associates 
200 Tower Building 
Seattle, Washington 98101 

DESCRIPTION - A third subroutine to be used with PDQ FORTRAN 
Processors C~2, CLC2 and CLT2. Allows all card columns 
to contain data on output. No decimal point space required 
for Floating Point Integers. Free and fixed format 
specifications may be used in one input format statement. 
All data input with a specification will give valid results 
when used in compare statements regardless of position 
of blanks in field. Output data are rounded at appropriate 
digit, if desired, without changing value of variable in 
storage. The exponential format specification. Type E, 
has been eliminated. All relocatable subs. And the 
arithmetic portion of the class A subs remain identical 
to PDQ Fixed Format Subs 11/63 with revisions of May 20, 
1964. Subroutine occupies the first 6,600 digits of storage 
similar to PDQ FCRTBAN fixed format and free form 
subroutines. This is a subroutine for use with programs 
compiled in PDQ FOBTRAN. The intent of the third alternate 
subroutines is to provide a system oriented to the needs 
of the normal engineering program. The original E 
specification has been sacrificed in favor of other features 
because it is least used by the engineer. 

PROGRAHMING SYSTEMS - Written in machine language. 

MINIHUH SYSTEM REQUIREMENTS - 1620 card system, 20K, 
Auto/Divide, no other special features. 

BASIC PROGBAM PACKAGE 

DOCUHENTATION - Write-up on Hicrofiche only. 
HACHINE READABLE - None. 

ORDERING INFCBHATION: PROGRAM NUMBER 162020049 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-02^050 

U1CR0 PROCESSOR FOE !.620 z VJ4.3 MONITOR I VERSION 2 



AUTHOR: Herle T. Proulx 

DIRECT TECHNICAL INQUIRIES TO: 
Merle T. Proulx 
10436 17th So. 
Seattle, Wash. 98168 



CONTRIBUTED PROGRAMS 



CONTINUED FBCM PBIOB PAGE 



CONTINUED FROM PRIOR COLUMN 



DESCRIPTION - The Macro Processor, when incorporated into 
the 1620-1443 Monitor I Version 2 System, will give the 
programmer the ability to easily define his own macro- 
operations. 

programming systems - Britten in SPS II-D. 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



CARDS 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



HINIHUN SYSTEM REQUIREMENTS - A 1620 Model 1 card system 
with 1 disk file and Indirect Addressing and a 11)43 Printer 
is required by the program. Could be made adaptable to 
system without a printer. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620020050 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 = 02.0^051 

TAETRAN INTERPRETIVE PROGRAMMING SYSTEM 



AUTHOR: 



N. R. Best, H. D. 



.1620^02^0^053 

JANET - DIGITAL ANALOG SIMULATION PROGRAM 



AUTHOR: 



Matlock 



DIRECT TECHNICAL INQUIRIES TO: 
J. D. Hatlcck 
BOX 1795 
San Francisco, Calif. 



94101 



DIRECT TECHNICAL INQUIRIES TO: 
W. R. Best, H. D. 

Biostatistics Research support Center 
Veterans Admin. Uosp. 
Hines, 111. 

DESCRIPTION - TABTRAN is a load-and-go language and its 
Compiler-Interpreter, encompassing a sub-set of FORTRAN, 
modified from GOTRAN, plus additional statements to 
facilitate tabulation (numeric as well as alphabetic 
characters) , cross-tabulation between columns of the same 
or different cards, and transformation of punched card 
data in which one or more cards are used for the data of 
each sampled entity. Card-column designations are naturally 
related to individual coding systems. There is considerable 
flexibility in the extraction of Floating-Point data from 
cards. Dates are readily converted to an absolute scale. 
This language is particularly adapted to data analyses 
in the medical, biological, and social sciences. Storage 
used - 20,000 positions for compiler-interpreter plus 
pseudo-commands and symbol table of object programs 
processed. SPS program of changes engrafted on GOTRAN 
for cards, program 1620-PR-011. SPS program is in two 
sections, 1st is major program containing program sections 
necessary with most loading options; 2nd section repeats 
tab routines at a different location for the option of 
tab routines only. Some additional transition loading 
cards have been written in machine language. All of these 
are combined in the master object deck. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620020051 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DESCRIPTION - The JANET program is a compiler for the IBM 
1620 computer whereby the actions of an analog computer 
are simulated using digital methods. A source program 
for the JANET language is similar to that of an analog 
schematic diagram using analog techniques. However, the 
program output is obtained through digital computation. 

PROGRAMMING SYSTEMS - Hritten in PDQ FORTRAN, compiled 
using the C-2 Version. 

MINIMUM SYSTEM REQUIREMENTS - Card, Auto Divide, Indirect 
Addressing, 1620 Model I. Storage - 19938 positions. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 162002053 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-02.0.054 

JANET-II - DIGITAL ANALOG SIMULATION PROGRAM 



AUTHOR: J. D. Matlock 

DIRECT TECHNICAL INQUIRIES TO: 
J. D. Matlock 
Box 1795 
San Francisco, Calif. 94101 

DESCRIPTION - The JANET II program is a compiler version 
of the JANET interpretive compiler for the IBM 1620, whereby 
the actions of an analog computer are simulated using 
digital methods. The JANET II Compiler is written to be 
compatible with the JANET compiler. 

PROGRAMMING SYSTEMS - Hritten in PDQ FORTRAN compiled 
using C-2 Version. 

MINIMUM SYSTEM REQUIREMENTS - Card, Auto Divide, Indirect 
Addressing, 1620 Model I. Storage - 19873 positions. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 



1620^02^0^52 

COMPUTES 1 



AUTHOR: 



Starkweather 



DIRECT TECHNICAL INQUIRIES TO: 
J. A. Starkweather 
Computer Center 
University of Calif. 
San Francisco, Calif. 94122 



DESCRIPTION - COHPUTEST is a protlem-oriented programming 
language for computer-assisted instruction, testing and 
interviewing. Sequences of instructional material and 
test questions may be written in natural language and a 
variety of cues may be used for the recognition of a right 
answer from typewriter input. Variable comments and choice 
of the next guesticn to he asked may be determined by the 
evaluation of an answer. Scoring and data collection is 
optional for each guestion. COHPUTEST acts as an 
interpretive translator of program material which is present 
in the card reader and read in the course of typewriter 
interaction with a subject. Storage used by program: 
00402-19999. (Area 19045-19999 is used as input buffer, 
so upper core may be available if input is restricted) . 

PROGRAMMING SYSTEMS - Written in 1620/1710 SPS. 

MINIMUM SYSTEM REQUIREMENTS - Card, Auto Divide, Indirect 
Addressing, 1620 Model I. Program cannot he used on lesser 
machine. Typewriter input is limited to a maximum of 477 
characters including blanks. 

BASIC EROGSAM PACKAGE 

DOCUMENTATION - Write-up. 
MACHINE READABLE - Appropriate 



laterial delivered. 



OPTIONAL FROGRAM PACKAGE 



ORDERING INFORMATION: PROGRAM NUMBER 1620020052 



ORDERING INFORMATION: PROGRAM NUMBER 1620020054 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-02.0.055 *M 

Ilfi IfilTBAN COMPRESSOR 

AUTHOR: K. J. Diggins 

DIRECT TECHNICAL INQUIRIES TO: 
K. J. Diggins 
A. S. Thomas, Inc. 
355 Providence Hwy. 
Westwood, Mass. 02090 

DESCRIPTION - PDQ FORTRAN COMPRESSOR reads an object deck 
compiled with the PDQ-CLT2 Processor and punches a new 
object program which requires less storage space and is 
slightly smaller and faster running than the original 
program. On long scientific programs it has saved over 
600 cOre storage positions. (Program processing time - 
50 seconds plus input/output time) . It eliminates program 
steps in execute procedure and branch instructions and 
eliminates the branch instructions in the Symbol Table 
and around FORMAT statements. It identifies the following 
errors which the PDQ Processor does not detect - (a) 
Undefined statement numbers contained in any branch or 
input/output statement, (b) Statement numbers which are 
used more than once. 

PROGRAMMING SYSTEMS - Written in N.C.E. SPS. 

MINIMUM SYSTEM REQUIREMENTS - 20K memory, card system. 
Auto Divide and Indirect Addressing. Storage used - 18,946 
positions. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 



CONTRIBUTED PROGRABS 
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BACHINE BEADABLE - Bone. 

CBDEBIBG INFOBBATION: PROGBAB BOBBER 1620020055 

Indicate "E M 1" in coluans 1-3 and the Program Number 
in coluans 1-13 on tie IBB Program order Form. 



1620-02.0.057 

IL£=Ji 121E MS 22 fortrab 122 20J 



G. Humrill 
H. Seward 



B. Fouler 



DIBECI TECBBICAL INQOIBIES 10: 
G. Bumrill 

Newark College of Engineering 
Computing Center 
323 High Street 
Newark 2, N.J. 

DESCBIPTION - This program is a compiler-interpreter capable 
of batch processing source decks written in a subset of 
the FOBTBAB Language. Answers are immediately available 
without any handling of object decks. The progran is 
intended to bring to the user of the 20K 1620, the 
advantages of Load-and-Go operation, especially when 
processing 100 to 200 card source decks. The system cannot 
be damaged by errors in programs. Bany error checks are 
made, both during compilation and execution. No format 
specifications are used. Output format is determined by 
the type and range of the variable, input format is free 
form. 

Built-in trace, single and double subscription, computed 
Go To statements, limited Hollerith listing, and undefined 
variable detection. 

PBOGBABHING SYSTEBS - Britten in N.C.E. High Speed 
Assembler. 

BINIBOB SYSTEM REQUIREBENTS - 1620 Hodel I or II, 20K, 

Auto Divide, Indirect Addressing, card or paper tape, not 
both, other programming language used N.C.E. High Speed 
Assembler. library Number - 01.1.029 

BASIC FBOGBAH PACKAGE 

DOCOBENTATION - Write-up. 

BACHINE BEADABLE - Appropriate material delivered. 

OPTIONAL EBOGRAB PACKAGE - None. 

OBOEBING INFOBBATION: PBOGEAH NDBBEB 1620020057 



CONTINUED FBOB PBIOB COIDBN 

Pennsylvania Transformer Div. 
Box 330 
Canonsburg, Fla. 

DESCBIPTION - C»B is a EDO FOBTBAH operating System 
providing batch processing, a mixed group of FOBTBAN 
compilation and execution runs. It permits storage of 
programs and data on one or more 1311 Disk Drives. 
Segmentation of programs is possible. The system contains 
very comprehensive error checking. The Operating system 
resides on the disk and occupies less than 5 percent of 
a single disk. 

PBOGBABBING SYSTEBS 
01.1.023. 

BINIBOB SYSTEB BEQOIBEBENTS - A 1620 card-disk file system 
with TBS, THF, HF, Auto Divide and Indirect Addressing. 
A 14&3 Printer may be used for output if available but 
is not required for the use of the system. 

BASIC PBOGBAB PACKAGE 

DOCOBENTATION - write-up on Bicrofiche only. 
BACHINE BEADABLE - None. 

OBDEBING INFOBBATION: PBOGBAB NOHBEB 1620020059 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



Britten in AFIT SPS, program number 



PBOGBAB BOBBER 
EXTENSION 



EASIC none 
CPTIOBAL none 



DISTBIBOTION BEDIOfl 
TYPE CODE 



DTE* 
none 



OSEB VOIOHE 
BEQOIBEBEBT 



none 
none 



1620-02^0.058 

SIIAI PBOCESSOE FOE COBPUTFJ ACCOUNTING CASE 



1620^02^0^060 

FORTE 

AOTHOB: C. D. BcKay 

DIBECT TECHHICAL INQUIRIES TO: 
C. D. BcKay 

Boyal Hilitary college of Canada 
Kingston, Ontario, Canada 

DESCRIPTION - A development from FOR-TO-GO made disk 
resident to combine the load and go features of FORGO with 
the capacity of F0B-T0-G0. Floating point hardware used 
and a rewrite of library function and subscription 
subroutines has increased the speed significantly, improved 
error messages, counts and records number of programs 
accepted, not accepted and completed. Array I/O, reread 
and plot statements, random number generator have been 
added. 

PBOGBABBING SYSTEBS - Written in SPS. 

BINIBOB SYSTEB BFQOIBEHENTS - A 10K card/disk system with 
TNS, TNF, BF, Auto Divide, Indirect Addressing and Floating 
point hardware. 

BASIC PBOGBAB PACKAGE 

DOCOBENTATION - Write-up on Bicrofiche only. 
BACHINE BEADABLE - None. 

ORDERING INFCEBATION: PROGBAB NOBBEB 1620020060 

Indicate "B N 1" in columns 1-3 and the Frogram Number 
in columns u-13 on the IBB Program order Form. 



AOTHOB: C. HacKenna 

DIBECT TECHNICAL IBQOIRIES TO: 
B. HCCoy 

Oniversity of Wisconsin 
Commerce D. P. Center 
Badison, Disc. 53706 

DESCRIPTION - BISAL is an accounting language designed 
for educational use. This system deals with a single pre- 
set accounting case, the wholesale Paper Company, decks 
for which are included. Input consists of student prepared 
programs in the WISAL Language, output being accounting 
statements. 

PBOGRABBIBG SYSTEBS - Problem and processor written in 
1620-1710 SPS II-D, sample program in BISAL Language. 
Utilizes 1620 Bonitor I or II. 

BINIBOB SYSTEB BEQOIBEBEBTS - card reader-punch... 20K 
storage... 1 1311 Disk Drive... Indirect Addressing. 
1620 Bonitor I or II can utilize 1«i»3 Printer, but the 
printer not required. 

EASIC PROGBAB PACKAGE 

DOCOBENTATION - Write-up on Bicrofiche only. 
BACHINE BEADABLE - None. 

OBDEBIBG IKFOBBATION: EROGRAH NOBBER 1620020058 

Indicate »E B 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620-02.0.859 

£i!E r AN OPERATING SYSTEB FOE EDS FORTRAN 



1620-02.0.061 

1E2 FORTRAN DISK SYSTEB FOB 1620 



AOTBOBS: J. Grant 

F. Baskiell 



G. Lilly 
L. Powell 



AOTHOR: 



A. Bussell 



DIBECT TECHNICAL INQUIRIES TO: 

F.B. Baskiell 



DIBECT TECHNICAL INQOIEIES TO: 
B. A. Bussell 
The Badger Co. Inc. 
Cambridge, Bass. 02112 

DESCBIPTION - The PDQ FORTRAB Disk System is an extension 
of the original PDQ FORTRAN (1620-02.0.031) written to 
permit storage of object programs on disk and linkage of 
program segment via CALL LINK. The Supervisor, Processor 
C2, Arithmetic-I/O subroutines, call link and Indexed I/O 
routines, and Common Save area occupy cylinders 0-3 and 
part of cylinder ». The rest of the disk, starting with 
sector 00929, is available for storage of programs. The 
processor requires 18138 digits of storage, permitting 
166 symbol table entries after the relocatable subroutine 
names on a 20K machine. Instructions in object prograns 
begin at 06650 unless the 1«»3 printer-oriented subroutines 
are used, in which case the origin is 06850. PDQ FORTRAN 
reduces the running time of object programs tc an average 
of one-third the time that would be reguired using FOBTEAB 
II-D without Automatic Floating Point hardware. 

BIBIHUB SYSTEB BEQOIBEBEBTS - Card system. Automatic Divide, 
Indirect Addressing, the 1311 Disk Storage Drive. The 
system will operate on 20K and will adjust for additional 
core storage available. The system can utilize the 1HU3 
Printer if available. 

BASIC PBOGBAB PACKAGE 

DOCUHENTATION - Write-up on Bicrofiche only. 
BACHINE BBADAELE - None. 

ORDERING INFOBBATION: PROGBAB NUBBEE 1620020061 

Indicate "B B 1" in columns 1-3 and the program Number 
in columns a-13 en the IBB Program Order Form. 



CONTRIBUTED PHOGBAHS 



1620-02.0.062 

FOB-D-PBIBTEB 

AUTHOB: Joyce Fodor 

DIBECT TECHNICAL INQUIRIES TO: 
Prof. c. II. Davidson 
Director, Engineering Computing Lab. 
University of Wisconsin 
Madison, Rise. 

DESCRIPTION - This allows the running of FOB-TO-GO-p under 
Monitor I-Version II control. The modified monitor has 
complete compatibility with Monitor I-Version II and the 
modified supervisor recognizes control cards for FORGO- 
D-P and transfers control to FORGC-D-P whenever specified. 
Control is returned to the supervisor whenever a JOB card 
is encountered. This program is an adaptation of FOB-TO- 
GO-P (1620-02.0.063). The write-up assumes the reader 
is familiar with F08-T0-G0-P and F0R-T0-GO (1620-02.0.009), 
and has the documentation for them available. 

PROGRAMMING SYSTEMS - Written in AFIT SPS or DATA SPS. 

MINIMUM SYSTEM BEQUIREMENTS - 1620 40K, card, printer, 
1 disk drive. Automatic Divide, Indirect Addressing. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PBOGBAM NUMBEB 1620020062 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20-02^0^163 

FCB-TC-GO-P PRINTER 



1620201.0^065 *H 

IHSPEC z INVESTIGATE NUME RICA LLY STUDENTS PROGRAM EXECUTE 
AND CONTROL 

AUTHOR: G. J. Germann 

DIBECT TECHNICAL INQUIRIES TO: 
G. J. Germann 
The Computer Center 
Seton Ball University 
south Orange, New Jersey 07079 

DESCRIPTION - INSPEC is an interpretive program which 
allows 1620 machine language programs to be read and 
executed under supervisory control. It will list and 
execute machine language programs and also list any card 
format or program errors at load and execution time, thus 
eliminating the Check Stop. INSPEC remains resident in 
core so that student programs nay be batch compiled. 
INSPEC examines the contents of arithmetic data fields 
for Becord Marks and High-Order Flags. It provides variable 
data field lengths, allows indirect addresses and will 
interrupt programs if looping or if they have exceeded 
a specified time limit. Essentially a student can approach 
the 1620 with a minimum of button pushing, load his program, 
get a program listing and error messages if he has made 
any execute his program, and get off the computer quickly 
to allow the next student access to the computer. 

programming SYSTEMS - Written in SPS II-D. 

MINIMUM SYSTEM REQUIREMENTS - 20K, card reader. Auto Divide, 
Indirect Addressing, 1620 Model I and 1443 Printer. Note; 
printer output can be changed to the typewriter. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBING INFOBMATION: PBOGBAM NUMBER 1620020065 



AUTHORS: Joyce Fodor Dennis Moser 

DIRECT TECHNICAL INQUIRIES TC: 

Prof . C. H. Davidson 

Director, Engineering Computing Lab. 

University of Wisconsin 

Madison, Wise. 

DESCRIPTION - This permits the use of FOB-TO-GO with a 
1443 (on-line) Printer. In it, PBINT, TYPE, and PUNCH 
now produces three distinct outputs. A source listing 
on the printer may be obtained during compilation with 
interspersed error comments. This program is an adaption 
of FOB-TC-FO (1620-02-0.009). The write-up assumes the 
reader is familiar with FOR-TO-GO, and has the documentation 
for it available. 

PROGRAMMING SYSTEMS - Written in AFIT SPS or DATA SPS. 

MINIMUM SYSTEM REQUIREMENTS - 40K 1620, card, printer. 
Indirect Addressing hardware, and Divide. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOBMATION: PROGRAM NUMBER 1620020063 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBH Program Order Form. 



16 20 = 02^0^g64 

FORGO P PRINTER 



AUTHORS: Joyce Fodor Dennis Moser 

EIRECT TECHNICAL INQUIRIES TO: 
Prof. C. H. Davidson 
Director, Engineering computing Lab. 
University of Wisconsin 
Madison, Wise. 53706 

DESCRIPTION - This permits the use of EOBGO with a 1443 
(on-line) Erinter. In it, PRINT, TYPE, and PUNCH now 
produce three distinct outputs. A source listing on the 
printer may be obtained during compilation with interspersed 
error comments. This program is au adaption of FORGO 
(1620-02.0.008). The write-up assumes the reader is 
familiar with FORGO, and has the documentation for it 
available. 

PROGRAMMING SYSTEMS - Britten in AFIT SPS or DATA SPS. 

MINIMUM SYSTEM REQUIREMENTS - 1620 40K, card, printer. 
Indirect Addressing hardware and divide. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFOBMATION: PROGRAM NUMBER 1620020061 

Indicate **B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20202^0.066 

* HODIFIED PDG FORTRAN SYSTEM 

AUTHOR: J. H. Wise 

DIBECT TECHNICAL INQUIRIES TO: 
J. H. Wise 

Bashington S Lee University 
Lexington, Virginia 24450 

DESCRIPTION - The PDQ system (1620-02.0.031) has been 
modified to include the following features: 1443 Printer 
options - list with Sense Switch 1 on, symbol table list 
(four items per line) upon successful compilation, and 
output for PBINT commands... a pre-compile option with 
Sense Switch 2 on which suppresses card punch... an B- 
format which fills the width with proper decimal point 
placement for .d. Sense switch options are reversed, the 
option to punch referenced source statements is deleted, 
and TRACE output is in a two-line format - address/value. 

PROGRAMMING SYSTEMS - Mainline, complete. .. machine languag 
modifications to PDQ system. 

MINIMUM SYSTEM REQUIREMENTS - Storage used is 18170 
positions... Card reader... TNS, TNF, MF... Auto Divide... 
Indirect Addressing... 1620 Model 1... 1443 Printer. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up. 
MACHINE REAEABLE - Object code. 

OPTIONAL PBOGRAM PACKAGE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620020066 



PBOGBAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 
REQUIREMENT 



OPTIONAL none 



1620201^.1^001 * 

VARIABLE FIELD SCUARE ROOT SUBROUTINE 

AUTHOR: H. H. Jefferys 

DIRECT TECHNICAL INQUIRIES TO: 
W. H. Jefferys 
Van Vleck Observatory 
Wesleyan University 
Middletown, Conn. 

DESCRIPTION - To take the sguare root of any number, given 
an arbitrary number of digits. The resulting sguare root 
has as many digits as the number input to the subroutine. 
Mathematical Method: Odd-Integer. X, the number whose 
sguare root is to be taken, must be greater than cr egual 
to zero. If it is negative, the routine will halt after 
printing *SQBT NEG BO*, and then take the sguare root of 
(X) . If N is the number of digits in the longest number 
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whose square root is to be taken, the routine requires 
43a plus 2H digits for the Indirect addressing version, 
and 554 plus 2N digits for the version which does not 
require Indirect Addressing. 

PROGRAMMING SYSTEMS - Hritten in SPS, 2-Pass. 

MINIMUM SYSTEM REQUIREMENTS - Any 1620 machine 
configuration. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620030001 

Indicate M B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^03^0^003 

ORTHOGONAL POLYNOMIAL COEFFI CIEN TS 

AUTHOR: Rex L. Hurst 

DIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Computer Center 
Utah State University 
Logan, Utah 

DESCRIPTION - This program computes orthogonal polynomial 
coefficients in the general case. The degree of the 
polynomial may be from 1 to 5. The X values may have any 
spacing but must be integers. The nunber of X values must 
be less than 501. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, Automatic Divide, 
Indirect Addressing, and additional instructions. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620030003 

Indicate «E N 1 n in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 z 03,. 0^005 

COMPUTATION OF BESSEL FUNCTIONS OF INTEGRAL, ORDER 



CONTRIBUTED PROGRAMS 

1620 
CONTINUED FROM PRIOR COLUMN 

ORDERING INFORMATION: PROGRAM NUMBER 1620030007 



Indicate "B N 1" in columns 1-3 and the Program Dumber 
in columns 4-13 on the IBB Program Order Form. 



1620-03.0.008 

CONVERSION OF KELVIN FUNCTIONS TO THEIR POLAR FORMS 



AUTHOR: 



S. C. J. Smith 



DIRECT TECHNICAL INQUIRIES TO: 
S. C. J. Smith 
Chemical Engineering Dept. 
University of Canterbury 
Christchurch 4, New Zealand 

DESCRIPTION - Auxiliary to the program titled Kelvin 
Functions of the First Order, the card output of which 
it converts to the polar forms often more useful in solving 
hydrodynamic, electric and electromagnetic oscillation 
problems embodying these functions. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Basic 20K, Automatic Divide, 
Indirect Addressing, SPS I 1622. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620030008 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



16 20-03. 0.009 

REAL ROOTS OF CUBIC POLYNOMIALS 



AUTHOR: 



Ryan 



AUTHOR: 



C. E. Grosch 



DIRECT TECHNICAL INQUIRIES TO: 
C. E. Grosch 
Davidson Laboratory 
Stevens Institute of Technology 
Hoboken, New Jersey 

DESCRIPTION - For a given argument X, an integer N is 
calculated, such that JN *X* 1. JN *X* is calculated using 
an approximation for N X and JN-1 *X* f . . . , JO *X* are 
calculated from the recursion relation - each JP *X* differs 
from the correct value by a constant, K. K is calculated, 
and each value of JP *X* is corrected. Memory 20K. 



MINIMUM SYSTEM REQUIREMENTS 

Unit. 



An IBM 1622 Card Read-Punch 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620030005 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620303^1^007 

KELVIN FUNCTIONS OF FIRST ORDER 

AUTHOR: S. C. J. Smith 

DIRECT TECHNICAL INQUIRIES TO: 
S. C. J. Smith 
Chemical Engineering Dept. 
University of Canterbury 
Christchurch 4, New Zealand 

DESCRIPTION - Computes first order BER, BEI, KER and KEI 
functions and their first derivatives, relevant to problems 
of viscous fluid flow about a torsionally oscillating 
circular cylinder and high freguency electric and 
electromagnetic effects in circular conductors. 

PROGRAMMING SYSTEMS - Written in SPS. 



MINIMUM SYSTEM REQUIREMENTS 
Indirect Addressing, SPS I. 



- Basic 20K, Automatic, Divide, 
1622 



BASIC FRCGBAM PACKAGE 

documentation - Write-up on Microfiche only. 

MACHINE READABLE - None. 



DIRECT TECHNICAL INQUIRIES TO: 
P. J. Ryan 

1130 N. Sheridan Road 
Waukegan, Illinois 

DESCRIPTION - Given the coefficients of a cubic polynomial, 
this program finds the real roots. It can be used as a 
separate program or included in a larger program. Cubic 
solution formula. Finds 1 real root - 3 real and unegual 
roots - 3 real and equal roots - 3 real roots, at least 
2 of which are equal. 

PROGRAMMING SYSTEMS - Language - Fixed/Float relocatability. 

MINIMUM SYSTEM REQUIREMENTS - Card system, memory 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620030009 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620-03 .0.011 

grap|ing 

AUTHOR: G. B. Miller 

DIRECT TECHNICAL INQUIRIES TO: 
G. B. Miller 
West Virginia Univ. 
Computer Center 
Morgan town, W. Virginia 

DESCRIPTION - Graphs one or two curves (easily modified 
to handle any number) which are single or double valued. 
Handles discontinuities, no real values existing (imaginary 
values) with adjustable scaling factor, starting and ending 
points, increments and axis location. Curves can be plotted 
using any normal 1620 character (+, *, -, #, etc.) as can 
axis. Also provides for titles of curves and table of 
values for curves. Specifications - Storage 18808 + 
subroutine, card system. Auto Divide, Fit. Pt. hardware. 
Program can be used on lesser machine. Table of Values 
can be removed. Program type is FORTRAN II. Subroutine 
or function subprogram - sub. 

MINIMUM SYSTEM REQUIREMENTS - The program was written for 
a 60K machine. However, because of the small amount of 
storage space required and a part which may be removed, 
it should be adaptable to any machine. A one card (program) 
is included to determine the amount of storage space used 
(written for 60K machine) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 
ORDERING INFORMATION: PROGRAM NUMBER 1620030011 
Indicate "B N 1 M in columns 1-3 and the Program Number 



CONTRIBUTED PROGRAHS 
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in columns 4-13 on the IBM Program Oraer Eora. 



1i20 z 03.0^0J2 

IIJtJD POINT DIVISION OR ADIT I PLICATION REGULATOR FOE DATA 
WITHOUT EXPLIC.IT DECIMAL PCIST ~ — ' 



AUTHOR: 



R. Eckert 



DIRECT TECHNICAL INQUIRIES TO: 
A- R. Eckert 

Department of Agricultural Economics 
University of Nebraska 
Lincoln, Nebraska 68503 

DESCRIPTION - The routine is a linkage which inserts data 
and rturns results in the form required to maintain decimal 
aligned fields irrespective of varying numbers of high- 
positions zeroes in either data. In contrast to inflexible 
mantissa lengths in Floating Point systems the routine 
permits full use of variable field lengths available in 
modern computers; combinations of various field lengths 
in one program are unlimited. Specifications programmed 
as "assumed" or "demanded" numbers of decimal positions 
permit the user to obtain fields of computed results from 
2 digit to storage capacity minus 10K. 

Computations are specified in a 41-digit record which is 
contained in the routine. A log of records can be obtained 
which permits tracking the computations- 
Triggers in the record are used to: 

(a) Obtain either division or multiplication. 

(b) Retain the computed-field flag or replace it by the 
program med-field flag. 

<c) Include or omit rounding prior to truncations. 

(d) The result to be added/substracted or transmitted to a 
specified field in the main area, or 

(e) Obtain print from the computing area (1) without, or (2) 
with printed decimal point. 

MINIMUM SYSTEM REQDIBEMENTS - IBM 1620 Model 1, Automatic 
Divide and Indirect Addressing features, card system (tape 
adaption is simple) Move-Flag is optional. Programming 
type - Actual machine language, open subroutine. An 
experiment and test program with test data and printout 
is provided. Inclusion into various subroutine decks is 
possible, but not profitable where programming system 
restricts fixed point. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620030012 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620 PAGE 039 

CONTINUED FBOM PRIOR COLUMN 

plot the results on the typewriter. Memory 20K, cards. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDEBING INFOEMATION: PROGRAM NUMBER 1620040002 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



NUBERICAL SOLUTION OF A FIRST ORDER DIFFERENTIAL EQUATION 
II MILNE'S METHOD USING RUNGE KDTTA 



AUTHOR: 



Karon 



SOLUTION FOR INITIAL VALUE PROBLEM INVOLVING ONE FIRST ORDER 
DIFFERENTIAL JfiHAZION ~~ 



AUTHOR: 



H. Owens 



DIRECT TECHNICAL INQUIRIES TO: 
R. H. Owens 

University of New Hampshire 
Computation Center 
Durham, New Hampshire 

DESCRIPTION - This program numerically approximates the 
solution to any initial value problem involving either 
*A* N first order differential equations or *B* an Nth 
order differential equation in which the Nth derivative 
can be obtained explicitly so that the differential equation 
can be reduced to *A*. When utilizing Hamming's method, 
truncation error can be controlled. Memory 40K, cards. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620040001 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
J. M. Karon 
Mathematics Department 
Standord University 



DESCRIPTION - This routine can be used to solve any first 
order differential equation of the form DY/DX equals F(X,Y), 
by the insertion of three cards. It uses Milne's method 
for the actual computation, and the Runge Kutta method 
to start. Milne's method is an iterative method in which 
at each step an indication of the truncation error can 
be obtained with little extra computation. The routine 
is self checking for convergence. Different delta X's 
can be used for the Milne computation, the Runge Kutta 
computation and for output. Output can be either printed 
or punched, each in three possible formats, depending on 
the amount known about the solution. The program can 
easily be modified to use any other predictor corrector 
method. Storage used by program 20K eguipment reguired 
by program-card system. The routine is written in AFIT 
FORTRAN but can easily be modified to be run in FORTRAN. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620040004 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-04.0.005 

SUBROUTINE RUNK 

AUTHOR: R. VachSS 

DIRECT TECHNICAL INQUIRIES TO: 

R. Vachss 
ITT Federal Labs. 
Computation Center 
492 River Road 
Nutley, New Jersey 

DESCRIPTION - This subroutine performs one step of numerical 
integration of a set of ordinary differential equations. 
The equations need not be linear and no special starting 
procedure is needed. It is net necessary to provide storage 
for previously computed results. The fourth order Runge 
Kutta method is used. The error per step varies as the 
fifth power of the step size. 

Restrictions are as follows - Dimension statements provide 
for a total of nine simultaneous first order equations 
or a smaller number of higher order equations in which 
the sum of the orders of the equations has a maximum of 
none. The Dimension statement may be modified for larger 
systems. Requires an auxiliary subroutine provided by 
user to specify differential equations. Storage used is 
2008 positions; equipment required - any configuration 
(which will compile FORTRAN II which the program is written 
in) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION; PROGRAM NUMBER 1620040005 



Indicate "I 
in columns 



N 1" in columns 1-3 and the Program 
4-13 on the IBM Program Order Form. 



!620 = 04..0_.J02 

SOLUTION FOR INITIAL VALUE PROBLEM INVOLVING ONE FIRST ORDER 

DIFFERENTIAL EQUATION "" 

AUTHOR: R. H. Owens 

DIRECT TECHNICAL INQUIRIES TO: 
R. H. Owens 

University of New Hampshire 
Computation Center 
Durham, New Hampshire 

DESCRIPTION - The arithmetic computation for F*X,Y* in 
any differential equation of the form DY/DX equals F*X,Y* 
may be altered by inserting cards at one place in the 
program deck. By a control number, PIT, the program will 



1620-04.8.006 

SOLOTION OF N SIMULTANEOUS FIRST-ORDER DIFFERENTIAL 

EQUATIONS " "'" '""'" 



AUTHOR: 



F. Taranto 



DIRECT TECHNICAL INQUIRIES TO: 
F, F. Taranto 
EDO Corporation 
College Point, New York 11356 

DESCRIPTION - This program supplies the FORTRAN source 
statements reguired to solve up to six simultaneous first 
order differential equations. It is a modification of 
the 1620 Library Program No. 04.0.001. This modification 



CONTRIBUTED PROGRAMS 
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provides the user with considerably more core space for 
the input, output and other source statements peculiar 
to his own problem. 

PROGRAMMING SYSTEMS - Sritten in PDB FORTRAN. 

MINIMUM SISTER REQUIREMENTS - A 1620 card system with 
13,000 positions of core storage, Auto-Divide and Indirect 
Addressing. 

BASIC EEOGRAB PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

BACHINE READABLE - Rone. 
ORDERIHG INFORBATION: PROGRAM BOBBER 1620040006 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Fori. 



16 20-05^4-001 

SIMULTANEOUS EQUATION SOLUTION 



1620-05.0.010 

"MATRIX-MATRIX MULTIPLICATION sjjbrodtibe 



AUTHOR: 



M. leeson 



EIRECT TECHNICAL INQUIRIES TO: 
D. N. Leeson 
IBB Corporation 
<I0 Sa» Bill River Road 
Hawthorne, New York 10532 

DESCRIPTION - This program generates the solutions to a 
linear systen of maximum rand 39 x 39. one may have 99 
constant vectors per matrix of coefficients, calculation 
of the product matrix. 

PROGRAMMING SYSTEMS - This program is written in SPS 
language, and is non-relocatable. 

BIRIMDM SYSTEM REQUIREMENTS - Arithmetic - Floating, 1620 
with 1622 attachment. Division feature not required. 
All of core is required for the maximum problem. 

B^SIC PROGRAM PACKAGE 

DOCUMENTATION - Program write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAH PACKAGE - None. 

ORDERING INFORBATION: PROGRAM BOBBER 1620050002 



AUTHOR: 



R. Jackson 



PROGRAM BUBBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION BEDIUB 
TYPE CODE 



CARDS 
none 



OSER VOLUHE 
REQUIREMENT 



none 
none 



DIRECT TECHNICAL INQUIRIES TO: 

G. R. Jackson 
computing Center 
University of Alberta 
Edmonton, Alberta, 
Canada 

DESCRIPTION - To multiply two matrices together and store 
the result separately from the other two matrices, using 
(Excess-50) Floating Point Format. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Storage 580 locations for 
the subroutine, and SPS storage requirements. Paper tape 
1620, Indirect Addressing, and Automatic Divide. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - »rite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620050010 

Indicate »B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



16 2£zl 1^.0^01 3 

MATII2 INHESION SUBROUTINE 

AUTHOR: Rex L. Hurst 

DIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State Oniversity 
Computer Center 
Logan, Utah 

DESCRIPTION - This program provides a basic operation in 
matrix arithmetic matrix inversion. 

PROGRAMMING SYSTEMS - It is written in SPS with a four 
instruction calling sequence and is relocatable. 

MINIMUM SYSTEM REQUIREMENTS - Indirect Addressing. 

BASIC PROGRAB PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORBATION: PROGRAM NUMBER 1620050013 



PROGRAB RUBBER 
EXTENSION 



1620Z45..J...00I 

SOLUTION Of SIMULTANEOUS LINEAR EQUATIONS 



AOTHOR: B. Preston 



BASIC none 
OPTIONAL none 



DISTRIBOTION BEDIOM 

TYPE CODE 

CARDS 15 

none 



USER VOLUME 
REQUIREMENT 

none 

none 



DIRECT TECHNICAL INQUIRIES TO: 
E. Preston 
IBM Corporation 
1st Data Processing Unit 
A. P.O. 343 
San Francisco, California 

DESCRIPTION - This program solves sets of non-homogeneous 
simultaneous liner equations with either printed or punched 
output. It is designed for ease of use. Operating 
instructions and error messages are automatically typed. 
Data values are entered in free fora notation as a group 
of digits with a decimal point. An optional power of ten 
may be added to each value. The Jordan method of 
elimination is used, a test for zero divisor is included. 
A maximum of 25 equations in 25 unknowns may be solved. 
A maximum of 8 significant digits per matrix element is 
allowed. 

PROGBAMMING SYSTEMS - The program is written in FORTRAN 
without Format. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, card input-output. 

BASIC PROGRAB PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORBATION: PROGRAM NUMBER 1620050007 

PROGRAM NOMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



1620-05.0.015 

BADAB - MATRIX DIAGOBALIZATION. AOTO MINIMIZATION OF ERROR 

AOTHOR: J. B. Kaplan 

DIRECT TECHNICAL IBQOIRIES TO: 
J. B. Kaplan 
University of Miami 
scientific Computing center 
p. 0. Box 8011 
Coral Gables 46, Florida 

DESCRIPTION - Given a system of simultaneous linear 
equations with a determinable maximum number of constant 
vectors, this program will, 1. Compute determinant of 
coefficient matrix. 2. Identify singular coefficient 
matrix. 3. Find solution vectors and perform error 
iteration. 4, Find inverse matrix and perform error 
iteration. 5. Perform error iterations on submitted 
solution vector. 6. Perform error iteration on submitted 
inverse matrix. 7. Find refined solution vectors and 
perform error iteration. 8. Find refined inverse matrix 
and perform error iteration. 9. Refine submitted solution 
vectors and perform error iteration on refined solution 
vectors. 10. Refine submitted inverse matrix and perform 
error iteration on refined inverse matrix. 11. Refine 
in terms of submitted absolute error bound. 12. Refine 
in terms of stored absolute error bound. 13. Refinein 
terms of submitted significant figures. 14. Refine in 
terms of stored significant figures. And many combinations 
of the above. 



EASIC none 
OPTIONAL none 



DTR» 
none 



none 
none 



PROGRAMMING SYSTEMS - Written in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, 40K, or 60K. 

Automatic Divide - Yes or No, Indirect Addressing - Yes 
or No. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 
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OBDEBING INFCBMATION: PBOGBAB BOBBEB 1620050015 

Indicate "E B 1" in columns 1-3 and the Frogram N 
in columns 4-13 on the IBB Program Order Porn. 



CONTBIBOTED PB0GB1BS 

1620 
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in columns 1-13 on the IBB Program Order Form. 



1620-05.0.021 

CBOOT BEDOCTIOH 



1620^05.0^016 

CilCDIJTION OF EIGJNJALOES AND EIGJNVECTCES OF ZV EO.OALS LAV 

AUTBOB: Bobert G. Bone 

DIBBCI TECBNICAL INOOIBIES TO: 
Bobert G. Bowe 
The Hitre Corporation 
Bedford, Massachusetts 

DESCBIPTIOB - In addition to providing eigenvalues/vectors, 
the program under Sense Switch control, will compute sguare 
roots of eigenvalues, (i.e. vibration frequencies in 
whatever system of units may be desired) and mill modify 
the eigenvectors so that in each the largest element is 
unity. 

PBOGBABMIBG SYSTEBS - Written in FOBTBiB without Format. 

BIBIHOB SISTBB BEQOIBEBBNTS - flemory 40K, cards, and no 
other special features reguired. 

BASIC PBOGBAB PACKAGE 

DOCOBENTATION - Write-up on Microfiche only. 
BACBIBE BEADABLE - Bone. 

OBDEBIBG INFOBHATION: PBOGBAB BDBBEB 1620050016 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



ADTBOE: 



S. S. Millwright 



DIBECT TECHBICA1 IBCOIBIES TO: 
B. C. Bentick 
336 Woodward Boad, S. E. 
Alburguergue, New Bexico 

DESCRIPTION - Bill evaluate determinants of maximum order 
36, solve simultaneous linear systems. with an indefinite 
number of constant vectors, and/or determine the inverse 
of maximum order 36 matrices. Singular input matrices 
are detected. Output includes data which indicates accuracy 
of solution vector. Bathematical method- Crout Seduction. 
Element in first row and first column of input matrix must 
not be zero. 

PBOGBABBING STSTEBS - This program was written in FOBTBAB. 

BIHIHOM SYSTEB BEQOIEEMENTS - All of core. Memory 60K. 

BASIC PBOGBAB PACKAGE 

DOCOBEBTATIOB - Write-up on Microfiche only. 
BACBIBE BEADAELE - Bone. 

OBDEBING INFORMATION: PBOGBAB NUBBEB 1620050021 

Indicate "B N 1" in columns 1-3 and the Program Bumber 
in columns 4-13 on the IBB Program Order Form. 



J620 z 0_5.i..019 

JiSiSJlIfiN OF A DJTERBIJANT 

AOTBOB: B. T. Barling 

DIBECT TECBNICAL INO.UIBIES TO: 
B. T. Barling 
Bath Department 

Air Force Institute of Technology 
Bright-Patterson AFB, Ohio 

DESCBIPTIOB - This program will evaluate a determinant 
of Order 40 or less. 

PBOGBABMIBG SYSTEBS - Written in SPS language. 

SINIBBM SYSTEM BEQOIBEMENTS - 20K, IBM 1620, with 20,00 
digits of memory, card input-output. 

BASIC PBOGBAB PACKAGE 

DOCUMENTATION - Write-up. 

BACBIBE BEADABIE - Appropriate material delivered. 

OPTIOBAI FBOGBAM PACKAGE - Bone. 

OBDEBIBG IBFOEBATIOB: PBOGBAB BDBBEB 1620050019 



PBOGBAB NOBBED 
EXTENSION 



EASIC none 
CPTIOBAL none 



DISTBIBOTIOB BEDIOB 
TYPE CODE 



CABDS 
none 



USEE VOLUME 
BEQOIBEBEKT 



none 

none 



J620 r 05^0^J20 

SOLUTION OF BOaOGEJEOOS AND BOfcHOMOGENJCDS SIMULTANEOUS 
LliSiS EQUATIONS 



AUTHCE: Beberto Pachon 



1620-05.0.024 

S OL0T I0B OF fl BEAL LINJAB EOOATIOBS IB N BE AL VABIABLES 

AOTBOB: Br. Donald S. Biller 

DISECT TECBBICAI IBCOIBIES TO: 
Br. Donald S. Biller 
Applied Bathematics Section 
flanagement Systems Development Department 
Eastman Kodak Company 
Bochester 4, New York 

DESCBIPTIOB - Bill calculate the numeric solution of from 
1 to 999 different BXN systems of linear eguations. For 
the restrictions on the system size, see the restrictions 
section of the program description. The Jordan Elimination 
Procedure was used to solve all linear systems, see the 
article entitled Theory of Selected Methods of Finite 
Matrix Inversion and Decomposition by George E. Forsythe, 
D. S. Department of Commerce, National Bureau of standards. 
Page 18. All calculations are subject to the laws of 
rounding error and the precision defined by the FOBTBAB 
system. 

PBOGBAMMIBG SYSTEMS - Written in FOBTBAB Language. 

BISIHUM SYSTEM HEQUIBEBENTS - Basic 1620 card machine. 
Three object programs are associated with the given source 
program, object program I was compiled on a 20K-machine 
using FOBTBAB with Format compiler. Object programs II 
and III were compiled on a 40K-machine (Floating Point 
Bardware) using FOBTBAB II Compiler. 

BASIC PBOGBAM PACKAGE 

DOCOBEBTATION - Write-up on Bicrofiche only. 

8ACBINE BEADABLE - None. 

OBDEBIBG IBFOEBATIOB: PBOGBAB BOBBEB 1620050024 

Indicate "B N 1" in columns 1-3 and the Program Bumber 
in columns 4-13 on the IBB Program Order Form. 



DIBECT TECHBICAL INQOIBIES TO: 
Hefcerto Pachon 

Automatic Electric Laboratories, Inc. 
400 Borth Wolf Bead 
Northlake, Illinois 

DESCBIPTIOB - The program solves homogeneous and non- 
homogenous systems of linear eguations. At the same time, 
it provides a measure of the accuracy of the computed 
solution. If the system has a unigue solution, this 
solution is typed. If the system has an infinite number 
of solutions, a general solution can be obtained. If the 
system is inconsistent, it has no solution and this is 
the answer typed. The program is restricted to non-ill- 
conditioned systems, and to a maximum of 17 equations with 
17 unknowns. 

PBOGBABMIBG SYSTEBS - Written in FOBTBAB with Format. 

BIBIBOM SYSTEM BEQOIBEBENTS - 1620 with card I/O, 20K 
memory. Automatic Divide and Indirect Addressing. 

EASIC PBOGBAB PACKAGE 

DOCOBEBTATION - Write-up on Microfiche only. 
BACBIBE BEADABIE - Bone. 

OEDEBIBG IBFCBBATION: PBOGBAM BOBBEB 1620050020 

Indicate "E N 1" in columns 1-3 and the Program Number 



1620^05.0^025 

BOOLEAN FUNCTION TEJBSPOBBATIOB 

AOTBOB: Katherine A. Wier 

DIBECT TECBBICAI IBCOIBIES TO: 
Katherine A. wier 

University of Illinois Medical School 
Chicago, Illinois 60612 

DESCBIPTIOB - A Boolean Function F is transformed according 
to three given explicit Boolean functions which are used 
for form a unitary transformation matrix B. The product 
function E eguals F * B is the conseguence solution of 
F and B. Source check is optional and will only be 
forwarded when specifically requested. Storage used by 
program is 11,322 positions. Equipment required by program 
card system. Indirect Addressing. Programming type is 
SPS 1620/1710. 

BASIC PBOGBAM PACKAGE 

DOCOHENTATION - Write-up on Bicrofiche only. 

MACBINE READABLE - Bone. 

OBDEBIBG IBFOBMATION: PBOGBAB BOBBEB 1620050025 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PBIOR COLOBS 



1620 z 05 A 0-i26 

GAUSS JOBDAN WITH PARTIAL PIVOTAL 



AUTHOR: 



J. Nelson 



DIRECT TECHNICAL INQUIRIES TO: 
D., <J. Nelson 
Conputing Center 
University of Nebraska 
Lincoln, Nebraska 68508 

DESCRIPTION - Gauss-Jordan with Partial Pivotal Condensation 
20x20 matrix with a 20K machine. Storage used by program 
is basic 20K core. Equipment required by program - Paper 
tape system. Auto Divide, Floating Point hardware. 
Programming language is UTO FORTRAN. Language used in 
the write-up is UTO FORTRAN. 

BASIC PROGRAM PACKAGE 

DOCUHENTATION - Write-up on Microfiche only. 

HACHINE READABLE - None. 

ORDERING INFOBMATION: PROGRAM NUMBER 1620050026 

Indicate "E N 1" in columns 1-3 and the program Number 
in columns 1-13 on the IBM Program Order Form. 



Computer center 
Norgantwon, W. Va. 

DESCRIPTION - This program computes the (N 2) cosines of 
the acute angles between (N) heperplanes represented by 
a set of N simultaneous equation - then types and punches 
the results. It will handle up to a 20 x 20 set. It is 
used to check for ill-conditioning between pairs of 
equations before solving, to determine if there is a 
solution. Especially valuable when an interation method 
is to be used for solution. Also valuable for use in 
determining if a given matrix has an inverse, especially 
if it is (nearly) singular, specifications - Storage 21390 
+ subroutines. Equipment - Card System, Auto Divide, Fit. 
Pt. Hdwr. This program can be used on lesser machine - 
The Dimension statement calls for a 20 x 20 set of 
equations. This may be reduced to be useable on a 20K 
machine. Language used is FORTRAN II. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620050032 

Indicate n B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program order Form. 



1620^05^0^030 

TWELVE z JONE JATBIX GENBR 

AUTHOR: Prof. A. Tepper 

DIRECT TECHNICAL INQUIRIES TO: 
Prof. A. Tepper 
Associate Professor of Music 
Hofstra university 
Hempstead, New York 

DESCRIPTION - The production of matrices (numerical, 
alphabetical with sharps, alphabetical with flats) based 
on twelve-tone rows. Solving for "combinatoriality"; 
positive results allow for permutations and generation 
of secondary matrices. Restrictions: data must be numeric 
and occupy card columns 1 and 2 with high order zero 
inserted. Storage requirements are 00102 - 05100. 

Equipment: Card, 20K memory. Indirect Addressing, no other 
special features required. Language - SPS - Fixed Point. 

BASIC FROGBAM PACKAGE 

DOCUHENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620050030 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-05.0.035 

SUBROUTINE CROUT FOR SOLUTION OF SIMULTANEOUS LINEAR 
EQUATIONS 

AUTHOR: Mrs. J. Fodor 

DIRECT TECHNICAL INQUIRIES TO: 
Prog. C. H. Davidson 
Director 

Engineering computing Laboratory 
University of Wisconsin 
Madison, Wisconsin 53706 

DESCRIPTION - This subroutine will solve a system of 
simultaneous linear equations using the Crout method. 
The number of equations is limited only by the size of 
the main program and the core available. Specifications 
- IBM 1620 able to use FOBTEAN II. 

Programming type - FORTRAN II subroutine. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOBMATION: PROGRAM NUMBEB 1620050035 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



!620 = 05.0..!31 

MAGIC II 



authob: 



- MATRIX ALGEBRA 
Dr. J. A. N. Lee 



DIRECT TECHNICAL INQUIRIES TO: 

Dr. J. A. N. Lee 

Queens Univ. 
Computing Center 
Ontario, Canada 

DESCRIPTION - This program is a fixed address problem 
oriented interpreter which enables, the user to write a 
program, each instruciton of which performs a single matrix 
operation. The user can thereby do a succession of matrix 
operations under program control. There are two matrix 
areas, A and B, each limited to the storage of not more 
than to 321 elements. Hence, if the matrix is square it 
cannot exceed 18 by 18, while an oblong matrix can be 
accepted provided no dimension exceeds 99 and the total 
number of elements is within the 321 limit. No provision 
is made for finding Eigenvalues. The inversion and 
simultaneous solution routine used her (and loaded 
automatically in this package) is the subroutine prepared 
by Leeson of IBM (IBM Program No. 5.0.001, first issue). 



Machine configuration - 1620 with 10 
Addressing, Automatic Divide. 



card I/O, Indirect 



BASIC EROGRAM EACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: EBOGRAH NUMBER 1620050031 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620-05^0^232 

PROGRAM TO CONVERT A COMPLEX MATRIX 



DIRECT TECHNICAL INQUIRIES TO: 
G. B. Miller 
W. Virginia Univ. 



1620-05^0^037 

OOES = DISK ORIENTED EQUATION SOLVES 

AUTHOR: R. Stephenson 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. c. F. Evert, Dir. 
University of Cincinnati 
University Computing Center 
Cincinnati, Ohio 

DESCRIPTION - This program utilizes the 1311 Disk to extend 
the capacity of the 1620 for the solution of simultaneous 
algebraic equations or matrix inversion. 200 x 200 matrices 
may be inverted. Written in SPS II D. A 1620 card system 
with 10K, a 1.311 Disk and TNF, MF, Auto Divide, Indirect 
Addressing, Floating Point hardware. Program could be 
used on a 20K machine, and with reassembly, it could be 
used on machines without the Automatic Floating Point 
feature. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBEB 1620050037 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620^5.0^038 

HftSKP.! CHAIN PROCESS 

AUTHOR: J. Stafford 

DIRECT TECHNICAL INQUIRIES TO: 
W. R. Beilly 

Dept. of Agric. Economics 
Univ. of Connecticut 
Storrs, Connecticut 06268 

DESCRIPTION - This program finds the steady state and 
transitional state matrices for a Markov Chain Process 
with m states, "m" less than or equal to ten. The program 
may be altered, with minor changes, to provide for (m) 
greater than ten. The program also multiplies the steady 



CONTRIBUTED PROGRAMS 



CONTINUED FBOH PBIOB PAGE 

state and transitional state matrices by an initial state 
1 x n vector to find the stead; state and transitional 
state vectors. The n-stage transitional state matrices 
are derived by matrix multiplication. The steady state 
matrix is fonnd by using the Gauss Elimination Method to 
solve the (m) lineraly independent simultaneous eguations. 
Storage used is under 20K. Equipment required: 1620 DPS 
with card I/O. Programmed in FORTRAN II. 

BASIC FROGBAM PACKAGE 

DOCUHENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDEBIHG INFORMATION: PBOGBAH NUMBER 1620050036 

Indicate "B 8 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBH Program Order Form. 



1620^05^1.039 

«iTRIX INVERSION AND SOLUTION OF LINEAR EQUATIONS 



CONTINUED FBOH PBIOB COLUHN 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBH Program Order Form. 



AUTHOR: 



Peter Schneider 



AOTHOS: 



Frank 



Oliva 



DIBECT TECHNICAL INQUIRIES TO: 
Frank H. Oliva 
1441 W. Howard 
Apt. 516 
Chicago, Illinois 60626 

DESCRIPTION - This program is for inversion of matrices 
and/or the solution of systems of linear equations by a 
direct (i.e. non-iterative) method. Given a square matrix 
A, the inverse of A can be calculated by the program. 
The reciprocal matrix is always given in the output. When 
the inverse matrix is not of interest, and the primary 
purpose is the solution of linear equations, a special 
matrix called the Product Form of the inverse can be 
obtained; this process requires approximately half the 
time as that for the inverse. This Product Form is as 
efficient as the inverse for the solution of eguations. 
As an option, when solving equations, the program can 
multiply the original matrix by the solution vector; this 
provides a check for the solutions. To check computation 
of the inversion of a matrix, the product of the original 
and reciprocal matrices can, also as an option, be 
calculated by the program. Any number of vectors K, up 
to 999, can be processed with a given matrix; It is 
unnecessary to specify their number. The determinant of 
the matrix is always calculated and obtained in the output; 
it gives an indication of the ill-condition of the specified 
matrix. The matrix to be processed may be of no order 
greater than 30; its elements must be within the internal 
plus and minus 10 to the eighth power. No element may 
have more than eight digits, nor should the elements 
corresponding to a vector, when solving equations, have 
more than eight digits. This program as it stands cannot 
be used on a machine of less than 60K, however, if a 60K 
memory is not available, either the dimension of the arrays 
involved, or the Floating Point Precision, or both, can 
be reduced to save core. The Fixed Eoint Precision is 
4; The Floating Point Precision, or both can be reduced 
to save core. The Fixed Point Precision is 4; The Floating 
Point Precision is 15. Speed is increased by decreasing 
the Floating Point Precision. Bowever, accuracy is 
sacrificed. The Fixed Point Precision is unalterable, 
because two alphameric characters, read into Fixed Point 
locations, are operated on in the program. 

PROGRAMMING SYSTEMS - Written in FORTRAN II. 

MINIHUM SYSTEM REQUIREMENTS - 1620 Model I or II with 60K 
memory. Auto Divide, Indirect Address, 1622 Card-Read- 
Punch. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 



DIRECT TECHNICAL INQUIRIES TO: 
Prof. C. H. Davidson 

Director Engineering Computing Laboratory 
University of Wisconsin 
Madison, Wisconsin 53706 

DESCRIPTION - MIN 3 generates the prime implicants of a 
Boolean function and extracts the essential prime 
implicants. The algorithm is a decimal modification of 
the Guine-McCluskey procedure. An option allows all 
intermediate columns to be punched out. 60K (could be 
reduced to 40K by reducing maximum size problem). Card 
system. FORTBAN II-D (F equals 10, K equals 5). 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAH NUHBEB 1620050041 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-06.0.006 

STEPWISE MULTIPLE LINEAR REGRE SSIO N 

AUTHORS: B. Bukacek w. Gelle 

DIRECT TECHNICAL INQUIRIES TO: 
w. J. Galle 
Armour S Company 
Operations Research 
401 N. Wabash 
Chicago, Illinois 



DESCBIPTION - Accepts sets of observations and forms linear 
regressions in a stepwise fashion subject to statistical 
criterion (F-TEST) . Stepwise linear regression memory 
20K, and paper tape. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAH NUMBER 1620060006 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



COMPLEX FORTRAN FOR THE 1620 



AUTHOR: Frank 



Maskiell 



OSDEKING INFORMATION 



PROGRAM NUMBER 1620050039 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1 6 2 Z 05.. 0^040 

IfiSES - MAXIMUM ONE PASS SIMULTANEOUS EQUATIONS SOLUTION 

AUTHOR: Ronald Rollmeier 

DIRECT TECHNICAL INQUIRIES TC: 
Ronald Hollmeier 

Pioneer Service S Engineering Co. 
2 N. Riverside Plaza 
Chicago, Illinois 60606 

DESCRIPTION - Solves sets of linear simultaneous equations 
by Gaussian elimination. Pivoting for size to promote 
accuracy and eliminate zero diagonal terms is automatic. 
Eguation sets of Rand 2 thru 41 can be solved. One constant 
vector per equation set is allowed. Card I/O on a 1620 
Model I with 20K storage. FORTRAN without Format. 

BASIC PROGRAM PACKAGE 

DOCUHENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620050040 



DIRECT TECHNICAL INQUIRIES TO: 
Frank B. Maskiell 

The Pennsylvania Transformer Division 
McGraw-Edison Company 
Box 330 
Canonsburg, Pennsylvania 

DESCRIPTION --, The FORTRAN processor and subroutine tapes 
have been revised to utilize certain variables as complex 
numbers. This permits the addition, subtraction, 
multiplication or division of two or more complex variables 
by the simple instruction D equals A op (B OP C) . The 
complex numbers are treated in rectangular component form 
and the arithmetic operations accomplished by means of 
FORTRAN class A subroutines. The complex variable is 
accepted only as a floating point number. 8600 positions 
are required for the subroutine package at the time of 
object running. Tape 1620, memory 20K. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDEBING INFORMATION: PROGRAM NUMBER 1620060008 

Indicate tt B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^06.0^01.1 

NON-LINEAR PATCH FOR MULTIPLE LINEAR REGRESSION PROGRAM 
OF B. U WILDER 8/8/61 



AUTHOR: 



H. Stevens, Jr. 



DIBECT TECHNICAL INQUIRIES TO: 
H. H. Stevens 

Texas Instruments Incorporated 
M & c Nuclear Products 
P. 0. Eox 898 
Attleboro, Massachusetts 



CONTRIBUTED PBOGRAHS 



CONTINUED FEOB PBIOB PAGE 

DESCRIPTION - To select, rearrange, and algebraically 
operate on variables in the data of a multiple linear 
correlation/regression experiment to code data, combine 
terns, make polynomial terms, eliminate nonsignificant 
variables and dependencies. To do non-linear regression, 
response surfaces, fitted to non-unif ormly located 
coordinates, and more efficient fits. Dp to 10,000 
observations with up to 41 variables per observation may 
be read in but only 29 selected and transformed variables 
can be bandied by the matrix inversion. Input record 
lengths per observation, 310 Alpha Numeric characters, 
10 variables, can be omitted at read-in. control work 
150 digits, (250 if print out of transformed variables 
is not used) . Benory 20K. 

BASIC PBCGBAH PACKAGE 

documentation - »rite-up on Bicrofiche only. 

MACHINE READABLE - Bone. 

OBDEBIBG INFORMATION! PBOGBAB BOBBEB 1620060011 

Indicate w fi B 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620^06^0^015 

C0BJB11TI0B 10-4 



COBTIBOED FBOB PBIOB COIOHB 

DOC0BEHTATI0B - Brite-up on Bocrofiche only. 
BACHIBE READABLE - Bone. 

OBDEBIBG IBFOBBATIOB: PBOGBAB NOBBEB 1620060019 

Indicate "B H 1" in columns 1-3 and the program number 
in columns 4-13 on the IBB Program order Form. 



1620-06.0.021 

CORBE1ATION COEFFICIENTS 



AUTHOR: 



H. J. Garber 



AUTHOR: 



Lev D. Harkins 



DIBECT TECHNICAL INQUIRIES TO: 
Lev D. Harkins 
Louisiana State University 
Computer Besearch Center 
Baton Bouge 3, Lousisana 

DESCBIPTIOB - Program gives means, standard deviations, 
and correlation coefficients for all combinations of 
variables by pairs up to a total of 40 variables. Variables 
are entered in Fixed Point form and may be from 2 to 7 
digits in length. Sums of sguares and cross products are 
obtained in 16 digit fixed point suns, in 10 digit fixed 
point N, the number of observations, limited to 5 digits. 
Final calculations are performed in Floating point. 

Card system, memory 20K, Automatic Divide, Indirect 
Addressing, and additional instruction #1021. 

BASIC PBOGBAB PACKAGE 

DOCUBENTATION - Urite-up on Bicrofiche only. 
BACHINE BEADABLE - None. 

CBDEBI8G IBFOBBATIOB: PBOGBAB NUBBEB 1620060015 

Indicate "B N 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBB Program Order Form. 



1620-06.0.JM6 

ISS2SJSSI DISTRIBUTIONS - SINGLE and DCUELE COLUMN 

MITHCB: lev D. Harkins 

DIBECT TECHNICAL INQUIRIES TO: 
Lev D. Harkins 
Louisiana State University 
Computer Besearch center 
Baton Bouge 3, Louisiana 

DESCBIPTIOB - Allov the selection of from 1-5 card columns 
for control. Single column program allovs 1-80 columns 
for freguency count and the double cclumn program allovs 
1-40 parts of columns. Frequencies and/or percentages 
are given. Only non-negative integers allowed in control 
or frequency columns of data cards, card system memory 
20K, Automatic Divide, Indirect Addressing, and Additional 
Instructions feature #1021. 

BASIC PBOGBAB PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
BACHIBE BEADABLE - None. 

OBDEBIBG INFOBBATION: PBOGBAB NUMBEB 1620060016 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM program order Form. 



DIBECT TECHNICAL INQUIRIES TO: 
M. J. Garber 
Univ. of California 
Bionetrical Lab. 
Biverside, California 

DESCBIPTIOB - Computation of a complete correlation matrix 
from an upper triangular matrix of sums of sguares and 
cross products, flay be used to prepare for entry into 
UCBBL 18. Benory 20K and no special features required. 

BASIC PBOGBAB PACKAGE 

DOCOHERTATIOB - Brite-up on Bicrofiche only. 
BACHIBE BEADABLE - None. 

OBDEBIBG IBFOBBATIOB: PBOGBAH BDMBEB 1620060021 

Indicate "B B 1 w in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.022 

PBODUCT MOMENT CORRELATIONS 



ADTHOB: M. J. Garber 

DIRECT TECHBICAL INQUIRIES TO: 
M. J. Garber 
Univ. of California 
Bionetrical Lab. 
Riverside, California 

DESCRIPTION - Computation of product-moment correlation 
coefficients from rav data. Output tape may be used as 
input to DCBBL 18. 19,329 positions. Memory 20K, and 
no special features required. 

BASIC PBOGBAB PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
BACHINE BEADABLE - None. 

OBDEBING IBFOBBATIOB: PROGRAM NDHBEB 1620060022 

Indicate "B B 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06_.0_ i 023 

ABALISIS OF COVAEIABCE : SPLIT PLOT FACTORIAL 

ADTHOB: flartha Orth 

DIBECT TECHBICAL INQUIRIES TO: 
fl. J. Garber 
Univ. of California 
Bionetrical Lab. 
Riverside, California 

DESCRIPTION - Computation of means and adjusted sums of 
sguares and cross products for one replicated main plot 
factor and tvo subplot factors. Part I, 13,073 positions. 
Part 2, 14,365 positions. Memory 20K, and no special 
features reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Bicrofiche only. 
BACHINE READABLE - None. 

ORDERING INFORMATION: PROGBAM NUMBEB 1620060023 

Indicate "B B 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program order Form. 



1620^06^^219 

BABB-BBITHEI TEST 



AUTHOR: 



E. Anderson 



DIBECT TECHNICAL INQUIRIES TO: 
B. E. Anderson 
Sandia Corporation 
Sandia Base 
Albuguerque, Rev Mexico 

DESCRIPTION - The Mann-Bhitney U Test is used to test 
vhether tvo independent random samples have been dravn 
from similar populations. It is among the most poverful 
non-parametric tests. Storage program - 02178-09095 plus 
subroutines data 09999-19999. Memory 20K, card 
input/cutput. 

BASIC PROGRAM PACKAGE 



1620-06.0.024 

ANALYSIS OF COVARI ANCJ - TBO-FACTOB FACTORIAL 



AUTHOR: 



J. Garber 



DIRECT TECHNICAL INQUIRIES TO: 
M. J. Garber 
Univ. of California 
Bionetrical Lab. 
Riverside, California 

DESCBIPTIOB - Computation of means and adjusted sums of 
squares and cross products. Memory 20K, and no special 
features required. 

BASIC PBOGRAB PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACBIBE READABLE - Bone. 



CONTBIBOTED PBOGRABS 



1620 

COHTINOED FEOB PEIOR PAGE 

OBDEEING INFOBBATION: PROGRAM NUMBERS 1620060021 

Indicate "E N 1" in caimans 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620^06^0^025 

ANALYSIS OF COIltlllCB = THO-FACTOB FACTORIAL 



AUTHOR: 



Garner 



DIBECT TECHNICAL INQUIRIES TO: 
H. J. Garber 
Oniv. of California 
Eiometrical Lab. 
Riverside, California 

DESCRIPTION - Computation of leans and adjusted sums of 
squares and cross products. Memory 20K, and no special 
features reguired. 

BASIC PBOGBAB PACKAGE 

DOCUMENTATION - Nrite-up on Hicrofiche only. 
BACHIBE BEADABLE - None. 

OBDEEING INFORMATION: PBOGBAB NDBBEE 1620060025 

Indicate "E N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBB Program Order Fom. 



1620-06.0.026 

ANALYSIS OF VARIANCE 



FOUR-FACTOB FACTORIAL 



AUTHOR: 



Garber 



DIBECT TECHNICAL INflOIBIES TO: 
H. J. Garber 
Univ. of California 
Eiometrical Lab. 
Riverside, California 

DESCBIPTIOH - Computation of means and adjusted suns of 
sguares for a four-factor factorial (randomized complete 
blocks) . Beoory 20K, and no special features reguired. 

BASIC PBOGBAB PACKAGE 

DOCUMENTATION - Nrite-up on Bicrofiche only. 
MACHINE BEADABLE - None. 

OBDEEING IBFCBBATION: PBOGBAB NOBBER 1620060026 

Indicate "B N 1" incolumns 1-3 and the Program Number 
in colunns <l-13 on the IBB Program Order Form. 



1620-06.0.027 

ANALYSIS Or VARIANCE - FOOB-FACTOB FACTOBIAL 

AOTHOB: H. J. Garber 

EIEECT TECHNICAL INQOIBIES TO: 
H. J. Garber 
Dniv. of California 
Biometrical Lab. 
Riverside, California 

DESCBIPTIOH - Computation of neans and adjusted suns of 
sguares for a Latin Square. 19,733 positions. Memory 
20K, and no special features required. 

BASIC PBOGBAB PACKAGE 

docdbentation - Hrite-Up on Bicrofiche only. 
HACBINE BEADABLE - None. 

OBDEEING IBPOBBATION: PBOGBAB NOBBEB 1620060027 

Indicate "E N 1" in colunns 1-3 and the Program Nunber 
in colunns 4-13 on the IBH Program Order Form. 



1620-06.0.029 

ANALYSIS OF VABIANCE 



AOTHOR: 



E. C. 



THBEE-FACTOB FACTOBIAL 

Eeckwith 



DIBECT TECHNICAL INQOIBIES TO: 
H. J. Garber 
Dniv. of California 
Biometrical Lab. 
Biverside, California 

DESCBIPTIOH - Computation of means and adjusted suns of 
squares for a three-factor factorial. 19,115 positions. 
Memory 20K, and no special features required. 

BASIC PBOGBAB PACKAGE 

DOCOHENTATIOH - Hrite-up on Microfiche only. 
HACHINE BEADABLE - Hone. 

ORDERING IHFOBHATIOH: PBOGBAB NUMBER 1620060029 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620:10.6.0.030 

ANALYSIS OF VARIANCE (SPLIT PLOT FACTOBIAL! 

AOTHOB: H. J. Garber 

DIBECT TECHNICAL INQOIBIES TO: 
M. J. Garber 
Oniv. of Calif. 
Biometrical Lab. 
Riverside, Calif. 

DESCBIPTIOH - Computation of means and adjusted sums of 

sguares for a three-factor factorial (one replicated mai 

plot factor and one subplot factor) . 

PROGRAMMING SYSTEBS - Britten in FOBTBAN. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 »ith 20K. 

BASIC PBOGRAM PACKAGE 

DOCUBENTATION - Nrite-up on Bicrofiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAB BOBBER 1620060030 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 0-13 on the IBM Program Order Form. 



1620^06^0^031 , e 

STEPHISE BEGRESSIOB i MODIFICATION. OF BIBD09J. 

AUTHOR: M. J. Garber 

DIRECT TECHNICAL INQUIRIES TO: 
H. J. Garber 
Oniv. of Calif. 
Biometrical Lab. 
Biverside, Calif. 

DESCBIPTIOH - Bultiple linear regression. Only significant 
variables are included in the final equation. A variable 
which is approximately a linear combination of others is 
not entered. 

PBOGRAHBIHG SYSTEBS - Nritten in FORTRAN. 

BIHIHOM SYSTEH BEQOIREBENTS - IBB 1620 with 20K. 

BASIC PBOGBAB PACKAGE 

DOCDBENTATION — Nrite-up on Bicrofiche only. 
HACHINE BEADABLE - None. 

OBDERING INFOBHATION: PROGRAM NUMBED 1620060031 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620^06.0^028 

ANALYSIS OF VARIANCE 



T»0 = FACT0E FACTCRIAI 



AUTHOR: 



Garber 



DIBECT TECHNICAL INQOIBIES TC: 
H. J. Garber 
Univ. of California 
Eiometrical Lab. 
Biverside, California 

DESCRIPTION - Computation of means and adjusted sums of 
squares for a tvo-factor factorial. 19,393 Positions. 
Memory 20K, and no special features required. 

BASIC PROGRAM PACKAGE 

documentation - Nrite-up on Bicrofiche only. 
BACHINE BEADABLE - Hone. 

OBDEEING INFORMATION: PBOGBAB NOBBEB 1620060028 

Indicate n B N 1" in columns 1-3 and the Program Nunber 
in columns 4-13 on the IBB Program Order Form. 



1620-06.0.032 

ANALYSIS CF COVABIANCE 



AUTHOR: 



0. Garber 



DIRECT TECHNICAL INQUIRIES TO: 
M. J. Garber 
Univ. of Calif. 
Biometrical Lab 
Riverside, Calif. 

DESCRIPTION - Simple correlation and regression analysis 
between slopes sum of squares is computed. Variable count 
per set is allowed. 

PBOGBAMHING SYSTEBS - Nritten in FOBTBAN. 

BINIMOB SYSTEM REQUIREMENTS - IBB 1620 with 20K. 

BASIC PROGBAB PACKAGE 

DOCUBENTATION - Nrite-up on Microfiche only. 
BACHINE BEADABLE - None. 



OBDERING INFORMATION: PROGBAB NOBBEB 1620060032 
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Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



1620z06.0_._033 

ANALY_S_IS OF VABIANCE JONE FACTCB) 



CONTRIBUTED PROGRAMS 

1620 
CONTINUED FBOH PBIOB COLUMN 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 with 20K. 



AUTHOR: 



J. Garber 



DIRECT TECHNICAL INQUIRIES TO: 
H. J. Garber 
Univ. of calif 

Biometrical lab 
Biverside, Calif. 

DESCRIPTION - Computation of means and adjusted sums of 
sguares. Variable count per treatment is allowed. 

PBCGBAMHING SYSTEMS - Britten in FOBTBAN. 

MINIMUM SYSTEM BEQOIBEMENTS - IBM 1620 Hith 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060033 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620z06.j_0_.03_i 
NORMALITY 



AUTHOR: 



Garber 



DIRECT TECHNICAL INQUIRIES TO: 
H. J. Garber 
Univ. of Calif. 
Eioaetrical Lab 
Riverside, Calif. 

DESCRIPTION - Test of departure from a normal distribution. 
K and G statistics are computed. 

PEOGBAMMING SYSTEMS -Written in FOBTBAN. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 with 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

OBDERING INFOBMATION: PBOGBAH NUMBER 1620060034 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



162_az06_.0__.035 

HOMOGENEITY P.F VARIANCE 



AUTHOR: 



Garber 



DIBECT TECHNICAL INQUIBIES TC: 
M. J. Garber 
Univ. of Calif. 
Biometrical Lab 
Biverside, Calif. 

DESCRIPTION - Bartletts test for Homogeneity of Variance. 
If CHI-squared is significant, a weighted analysis of the 
means is made. Variable count per treatment is allowed. 

PROGRAMMING SYSTEMS - Nritten in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 with 20K. 

BASIC PROGRAM PACKAGE 

EOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620060035 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620z06^0_.036 

HOiUPLE RANGE TEST OF MEAN DIFFERENCES 

AUTHOR: E. C. Beckwith 

DIRECT TECHNICAL INQUIRIES TO: 
H. J. Garber 
Univ. of Calif. 
Biometrical Lab 
Riverside, Calif. 

DESCBIPTION - The standard error and least significant 
ranges are computed. Means are ranked, and all mean 
differences are computed and compared with appropriate 
least significant ranges. 

PBGGSAHHING SYSTEMS - Written in FOBTBAN. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOBMATION: PROGRAM NUHBER 1620060036 

Indicate »B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.037 

MATRIX INVERSION AND SOLUTION OF SIMULTANEOUS LINEAR 

EQUATIONS 

AUTHORS: Mr. R. H. Hill H. J. Garber 

DIRECT TECHNICAL INQUIRIES TO: 
M. J. Garber 
Univ. of Calif. 
Biometrical Lab 
Riverside, Calif. 

DESCRIPTION - All independent variables are entered. The 
smallest contributor is deleted. The original matrix is 
condensed, and the process is repeated with N-1 variables. 
Recycling occurs until only one independent variable 
remains. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 

HINIMOH SYSTEM BEQUIREMENTS - IBM 1620 with 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060037 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620z0__.___^038 

LINEAR COERELATICN COEFFICIENT 

AUTHOR: Robert J. Robinson 

DIRECT TECHNICAL INQUIRIES TO: 
Robert J. Robinson 
Harguette University 
1515 W. Wisconsin Avenue 
Milwaukee 3, Wisconsin 

DESCRIPTION - This program computes the linear correlation 
coefficients between up to 50 variables, and gives the 
standard deviation, and standard error of the correlation 
coefficient for each. FORTRAN Floating Point. Maximum 
of 50 variables, and not more than 9999 observations (or 
data sets) . 

PROGRAMMING SYSTEMS - Written in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 with 40K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAH NUHBER 1620060038 

Indicate n B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.039 

STATISTICS I 

AUTHOR: Robert J. Robinson 

DIRECT TECHNICAL INQUIRIES TO: 
Robert J. Robinson 
Marguette University 
1515 w. Wisconsin Avenue 
Milwaukee 3, Wisconsin 

DESCRIPTION - This program computes the sum, mean, standard 
deviation, error of estimate, sub of squared deviations, 
and coefficient of variation, for each variable, and T- 
ratio and degree of freedom, between all pairs of variables, 
for up to 50 variables. Missing data is accounted for. 
Maximum of 50 variables. If the data is drawn from the 
same related group the formulas used are not valid. If 
the mean of variable is zero, the coefficient of variation 
has no meaning as calculated. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 



MINIMUM SYSTEM REQUIREMENTS 
Card Read/Punch. 



IBM 1620 with 40K, and 1622 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUHBER 1620060039 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PBIOE PAGE 

Indicate W E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1622=06-0^040 

SOM OF SQUARES AND PRODUCTS* CORRELATIONS 

AUTHOR: Bex L. Hurst 

DIEECT TECHNICAL INQUIRIES TO: 
Bex L. Hurst 
Utah State University 
Computer Center 
Logan, Dtah 

DESCBIPTIOB - Computes total, means, sums of squares and 
products, standard deviations, correlations for up to 50 
variables in 40K version and 30 variables in 20K version, 
or 40K. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - 20K r Automatic Divide and 
Indirect Addressing. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Srite-up on Microfiche only. 
MACHINE EEADABLE - None. 

OBDEBING INFOBMATION: PBOGBAM NUHBBB 1620060040 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



162^06^0^041 

FACTORIAL ANALYSIS OF VARIANCE 

ADTHOB: Bex L. Hurst 

DIBECT TECHNICAL INQDIBIES TO: 
Bex L. Hurst 
Dtah State University 
Computer Center 
Logan, Dtah 

DESCBIPTION - This program will compute the final analysis 
of variance and the treatment means for any analysis of 
variance that is balanced and can be analyzed by a factorial 
or pseudo factorial approach. The punching of means is 
under the control of the operator. 



PROGRAMMING SYSTEMS 



Written in SPS. 

40K, Automatic Divide, and 



MINIMUM SYSTEM REQUIREMENTS 
Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NDMBER 1620060041 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06^0^043 *H 

CONTINUOUS FOREST INVENTORY STATISTICAL CHECK PBOGBAM 

AUTHOB: Otto Dykstra, Jr. 

DIBECT TECHNICAL INQUIRIES TO: 
Otto Dykstra, Jr. 
General Foods Research Center 
55 South Broadway 
Tarrytown, New York 

DESCRIPTION - A complete multiple regression package with 
convenient input-output formats. One program will multi- 
process as many as 18 variables without intermediate output. 
A three-part program will handle up to 44 variables. An 
auxiliary program will give predictions and obtain residuals 
for the actual data and predictions for supplementary 
combinations. A follow-up program will prepare various 
plots of the residuals. 

PROGRAMMING SYSTEMS - Britten in SPS. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 with 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060043 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTINDED FROM PBIOR COLUMN 

DIRECT TECHNICAL INQUIRIES TO: 
Otto Dykstra, Jr. 
General Foods Research Center 
555 South Broadway 
Tarrytown, New York 

DESCBIPTION - Performs the analysis of two-level, 
unreplicated or fractionally replicated factorial 
experiments. Almost all of memory is used. 

PROGBAMMING SYSTEMS - Britten in SPS. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 with 20K. 

BASIC PROGBAH PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche Only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060044 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620=06^049 

PROGRAH TC PLOT CONTOURS OF CONSTANT RESPONSE FOR A 
QUADRATIC REGRESSION 

AUTHOR: Otto Dykstra, Jr. 

DIRECT TECHNICAL INQUIRIES TO: 
Donald S. Gardner 
Research Center 
General Foods Corporation 
555 South Broadway 
Tarrytown, New York 

DESCRIPTION - This program will accept the coefficients 
of at most a quadratic function and plot contours of 
constant response, for a specified X on the horizontal 
scale and another specified X on the vertical scale. 
Multiple plots are given if there are more than two xs. 

PROGRAMMING SYSTEMS - Britten in SPS. 

HINIHDM SYSTEM REQUIREMENTS - IBM 1620 with 20K. 

BASIC PROGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060049 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.050 

FISHERS EXACT PROBABILITY FOR A 2X2 TABLE 

AUTHOR: Thomas C. Teeples 

DIRECT TECHNICAL INQUIRIES TO: 
Thomas C. Teeples 
George Washington University 
Human Resources Research Office 
2013 *G* Street, N. H. 
Washington, D. C. 

DESCRIPTION - Calculates the exact probability of all 
possible patterns keeping the marginal totals fixed. Also 
computes cumulative probabilities and one minus the 
cumulative probabilities. 

PROGBAMMING SYSTEMS - Britten in FORTRAN. 

IBM 1620 Card system. 



MINIMUM SYSTEM REQUIREMENTS 
Automatic Divide, 20K. 

BASIC PROGRAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060050 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.051 

"EAN STANDARD DEVIATION AND VARIANCE 



AUTHOR: 



William E. Hilner 



1620=06.0.044 

ANALYSIS OF 2 = LEVEL FACTORIAL E XPER IMENTS 

AUTHOR: Otto Dykstra, Jr. 



DIRECT TECHNICAL INQUIRIES TO: 
William E. Milner 
North Texas State University 
Computer Center 
Denton, Texas 

DESCRIPTION - To compute and output the mean, standard 
deviation, and variance for up to 15 by N input matrix, 
for the rows (if Sense Switch 4 is on) and for the columns. 
N equals No. of rows, M equals No. of columns. 

PHOGRAMMING SYSTEMS - Britten in FORTRAN. 



CONTRIBUTED PROGRAMS 
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BISIBOI! SYSTEM REQUIREMENTS - 



IBM 1620 card system, 20K. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - Bone. 

OBDEBIBG INFORMATION: PBOGBAB BOBBEB 16200600S1 



BASIC 
OPTIONAL 



PROGRAM NUMBER 
EXTENSION 



none 
none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620^06^0.052 

SIMPLE CORRELATION COEFFICIENT M ATRIX 

AUTHOR: William E. Hilner 

DIRECT TECHNICAL INQUIRIES TO: 
William E. Hilner 
North Texas State University 
Computer Center 
Denton, Texas 

DESCRIPTION - To compute the simple correlation coefficient 
matrix as input to the factor analysis routine by the sane 
author and as a general routine for the coefficients. 
Uses the standard form. 

PROGRAMMING SYSTEMS - Britten in FORTRAN. 

MINIMOH SYSTEM REQUIREBENTS - IBB 1620 card system, 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

BACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060052 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06. 0.053 

FACTOR ANALYSIS BY THE CE.NTR.PJP. METHOD. 

AUTHOR: William E. Hilner 

DIRECT TECHNICAL INQUIRIES TO: 
Hilliam E. Hilner 
North Texas State University 
Computer Center 
Denton, Texas 

DESCRIPTION - To compute the factor loadings for a set 

of simple correlation coefficients using Thurston's Centroid 

Method. Hill accept up to a 15 by 15 correlation matrix. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 card system, 20K. 

BASIC PROGRAM PACKAGE 

EOCUHENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUHBER 1620060053 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-1 3 on the IBH Program Order Form. 



162,0-06.0.055 

CHI-SQUARE #2 

AUTHOR: L. D. Harkins 
DIRECT TECHNICAL INQUIRIES TO: 

L. D. Harkins 
Louisiana State University 
Computer Research Center 
Baton Rouge, Louisiana 

DESCRIPTION - Calculate Chi-Sguare value for contingency 
table of up to 120 columns. 20K or greater. Automatic 
Divide, Indirect Addressing, I/O card, and Additional 
Instructions feature. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060055 

Indicate "B N 1" in columns 1-3 ana the Program Number 
in columns 4-13 on the IBH Program Order Form. 



16 20-0 6.0.056 

FINITE FOURIER ANALYSIS! is. COEFFICIENTS PROGRAM ; 
B. PLOT-BACK PROGRAM 



AUTHORS: J. C. Baker 



H. Brown 



DIBECT TECHNICAL INQUIRIES TO: 

J. C. Baker 

University of California 
Computing Center 
Davis, California 

DESCRIPTION - These two programs provide a convenient means 
of applying finite Fourier analysis to experimental data. 
Many options are provided, so that the output will contain 
only that which is of interest to the user in his particular 
problems. He have attempted to make the formats as general 
as possible, and the output of the coefficient program 
feeds directly with no change into the plot back program. 
20K or more. Memory 20K, and no special features required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060256 

Indicate "B N 1" in columns 1-3 ana the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.058 

MANN-WHITNEY U TEST WRITTEN IN FORTRAN 



AUTHORS: 



Burns 



Good 



1620-06^.0.054 

SEASONAL ADJUSTMENT 



AUTHOR: Milo 0. Peterson 



DIRECT TECHNICAL INQUIRIES TO: 
M. Burns 
Baylor University of Medicine 

Biomathematics Laboratory 
Houston, Texas 

DESCRIPTION - When at least ordinal measurement has been 
achieved, the Hann-Hhitney U Test may be used to test 
whether two independent groups have been drawn frcm the 
same population. Memory 20K, and no special features 
required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE EEAEABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060058 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



DIBECT TECHNICAL INQUIRIES TO: 
Milo 0. Peterson 
Federal Reserve Bank 
73 South Fifth Street 
Minneapolis 2, Minnesota 

DESCRIPTION - Seasonal adjustment of monthly statistical 
series. At the direction of the lead card, this program 
will also index to any base (computed internally Or provided 
in the lead card) and/or make working day adjustments. 



PROGRAMMING SYSTEMS - Written in FORTRAN. 



MINIMUM SYSTEM REQUIREMENTS - Card system. 
Divide. 



20K, Automatic 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBEB 1620060054 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1 6 2 0^0 6 ..0_. 060 

ONE PASS ANAIISIS OF VARIANCE 

AUTHOR: L. D. Harkins 

DIRECT TECHNICAL INQUIRIES TO: 
L. D. Harkins 
Computer Research Center 
Louisiana State University 
Baton Rouge, Louisiana 

DESCRIPTION - Calculate analysis of variance without sorting 
data cards en sorter. 20K or greater. Automatic Divide, 
Indirect Addressing, I/O card. Additional Instructions 
required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060060 

Indicate "B N 1" in columns 1-3 and the Program Number 



CONTRIBUTED PROGRAMS 



1620 
CONTINUED FHCH PBIOB PAGE 

in columns 4-13 on the IBH Program Order Forn. 



CONTINUED FROM PBIOR CCLUMN 



DOCUMENTATION - write-up on Hicrofiche only. 
MACHINE READABLE - Hone. 



.16 2 0- 06^2^ 0£J 

S£lII PLOT ANALYSIS OF IftHIANCE 



AUTHOR: 



Harkins 



ORDERING INFORMATION: PROGRAM NUMBER 1620060064 



Indicate "B N 1" in columns 1-3 and the Program 
in columns 4-13 on the IBH Program Order Form. 



CIBECT TECHNICAL INQUIRIES TO: 
L. D. Harkins 
computer Research Center 
Louisiana State University 
Eaton Rouge, Louisiana 

DESCRIPTION - Calculate analysis of variance for problems 
with large numbers of observations. Can be used on 20K 
or greater. Automatic Divide, Indirect Addressing, I/O 
card. Additional Instructions required. 

BASIC PBGGBAH PACKAGE 

DOCUHEHTATION - Write-up on Microfiche only. 

MACHINE READABLE - Hone. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620060061 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns M— 13 on the IBM Program Order Form. 



1620Z06..0..062 

INALYSIS p_F VARIANCE 



BALANCED LATTICE DESIGN 



AUTHOR: 



Hurst 



DIRECT TECHNICAL INQOIBIES TO: 
R. L. Hurst 
Utah state University 
Computer Center 
Logan, Utah 

DESCBIPTION - computer analysis of variance, unadjusted 
and adjusted treatment means for balanced lattice designs. 
Standardized card form not reguired. The larger the memory 
the larger the size of problem that can be handled. As 
written the program reguires Additional Instructions to 
enable FCRCCM to be added to FCBTRAN Format. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUWBEK 1620060062 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-e6_.0_.063 

USHERS EXACT METHOD 

AUTHOR: B. E. Anderson 

DIRECT TECHNICAL INQUIRIES TO: 
H. E. Anderson 
Sandia Corporation 
Sandia Base 
Division 1442 
Albuguergue, New Hexico 

DESCBIPTION - The program determines whether a significant 
difference exists between twc fractions. The need for 
calculating logarithms of factorials is eliminated by using 
an equivalent recursive technique. 

Memory 20K, card I/O, and no other special features 
reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFCRHATION: PROGBAH NUMBER 1620060063 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-06.0.064 

E1RTIAL CORRELATIONS - FIRST OR FIRST AND SECOND ORDER 



J620-06. 0.065 

NESTED ANALYSIS O.F VARIANCE FOB UNEQUAL SUBCLASS NU HBEBS 

AUTHOR: Allan L. Heath 

DIRECT TECHNICAL INQUIRIES TO: 
Allan L. Heath 
Biometrical Services 
U.S.D.A. 
Beltsville, Maryland 

DESCBIPTION - Program computes for a hierarchical 
classification the degrees of freedom, sums of sguares 
(or sums of cross products) , mean sguares, coeffecients 
of variance or covariance components, relative amount of 
variability each component represents, overall mean, error 
standard deviation, and coefficient of variability. Special 
features are: Computes analysis of variance cr convariance, 
no detail card format necessary, seguence checking of 
detail cards, handles 60 variables for AOV or 78 covariance 
analyses, handles 5 way hierarchical classification. 20K 
memory. Automatic Divide, Indirect Addressing, 1622. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE BEADABLE - None. 

ORDERING IHFORHATION: PROGRAM NUMBER 1620060065 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-06.0.066 

STRAP - STEPWISE REGRESSION ANALYSIS PROGRAM 

AUTHOR: A. R. Colville 

DIRECT TECHNICAL INQUIRIES TO: 
A. R. Colville 
IBM Corporation 
2601 S. Main Street 
Houston 2, Texas 

DESCBIPTION - STRAP is a multiple linear Stepwise Regression 
Analysis Program containing extensive provisions for the 
transformation of input variables. 



PROGRAMMING SYSTEMS 



Written in SPS. 

Memory 20K and no other 



MINIMUM SYSTEM REQUIREMENTS 
special features reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE BEADABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFCRHATION: PROGRAM NUMBER 1620060066 



PROGRAM NUMBER 

EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



AUTHOR: 



L. Hurst 



DIRECT TECHNICAL INQUIRIES TO: 
R. L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - Computes on control card demand any set of 
first or first and second order partial correlations, and 
any number of sets. Either raw data or the correlation 
matrix may be used as input. Can be dimensioned for any 
size memory. As written, the program reguires Additional 
Instructions to enable FORCOH to be added to FORTRAH Format. 



16 20-0 6.0.069 

ANALYSIS OF VARIANCE... SPLIT-PLOT FACTORIAL DE SIGN 

AUTHORS: Henry A. Fribourg Hichael Kennedy 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. Henry A. Fribourg 
Department of Agronomy 
University of Tennessee 
Knoxville, Tennessee 

DESCRIPTION - To analyze data according to a split-plot 
factorial design analysis, and to provide an orderly 
analysis of variance table and an orderly array of treatment 
means at all levels. Approximately 35,000 memory positions. 
Hemory 40K, INS, TNF, MF. 

BASIC PROGRAM PACKAGE 

DOCUHENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060069 

Indicate H B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



BASIC PROGRAM PACKAGE 



CONTRIBUTED PROGRAMS 



1620306^0^070 

AKALISIS OF VARIANCE^ RANDOMIZED COMPLETE BLOCK DESIGN^ NO 

SaB^SAHPLES 

ADTHOBS: Henry A. Fribourg Fred R. Boberts 

DIRECT TECHNICAL INQUIRIES TO: 
Henry A. Fribourg 
Department of Agronomy 
University of Tennessee 
Knoxville, Tennessee 

DESCRIPTION - To analyze the data in a randomized complete 
block design when no sub-samples ate allowed, and to furnish 
the completed analysis of variance table and the means 
for each treatment. Approximately 26,000 memory positions. 
Memory 40K, TNS, TNF, HF. 

BASIC PROGRAH PACKAGE 

DOCUMENTATION - Hrite-up on Hicrofiche only. 
MACHINE BEADABLE - None. 

CBDEBING INFOBMATION: PROGRAM NUMBER 1620060070 



1620-06.0.079 

THREE HAY INDEPENDENCE CHI-SQOABE ANALYSIS* COUNT TABLE OR 
BAH DATA 



AUTHOR: 



Bex I. Hurst 



Indicate "E N 1" in columns 
in columns 4-13 on the IBH 



1-3 and the Program Number 
Program Order Form. 



DIBECT TECHNICAL INQUIRIES TO: 
Rex I. Hurst 
Utah State Oniversity 
computer center 
Logan, Utah 

DESCRIPTION - Bill compute three way independence chi- 
Sguare Analysis from either the three way count table or 
will compute the three way count table from raw data and 
proceed. Computes all possible two way independence Chi- 
Sguares as a byproduct. Memory 40K, Indirect Addressing, 
and additional instructions to enable FOB.COM to be added 
to FOETBAN Format. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Hicrofiche only. 
MACHINE BEADABLE - None. 

ORDERING INFOBMATION: PROGRAM NOHBER 1620060079 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.8.075 

HODNDING SUBROUTINE 



AUTHOR: Fred w. Boberts 



1620-06.0. 



DIRECT TECHNICAL INQUIRIES TO: 
Fred H. Boberts 
University of Tennessee . 
university Computing Center 
Knoxville, Tennessee 

DESCRIPTION - To round a floating point number to the 
number of significant digits specified by the user. 230 
positions. Memory 20K, Move Flag OP. Code (71). 

BASIC PROGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Hicrofiche only. 
MACHINE BEADABLE - None. 

CBDEBING INFORHATION: PBOGBAH NUMBER 1620060075 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06. 0.e77 

5IEGE ANALYSIS FOB HIGHLY COR 



author: Frank Gibbard, Jr. 



(ELATED DATA 



COVARIANCE ANAJJSIS _ COMPLETELY BAHDOMIZJE EESIGN - SIMPLE 
P.! MULTIPLE USU 29 

AUTHOB: Rex L. Hurst 

DIBECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - The program will compute a covariance analysis 
on a completely randomized design. Either simple or 
multiple covariance with variable counts per group. Memory 
40K and Additional Instructions to enable foecom to be 
added to FOBTRAN Format. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Hicrofiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGBAM NUMBER 1620060860 

Indicate "B N 1" in cclumns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
Mr. B. T. Rhodes, Jr. 
Humble Oil £ Befining Company 
Research S Development 
Eaytown, Texas 

DESCBIETICN - This program is a useful supplement to the 
least sguares technique in regression analysis of highly 
correlated data. In such cases the least squares 
coefficients are often inflated beyond a reasonable size. 
Bidge analysis decreases the coefficients, while keeping 
a good fit. 17,925 storage positions are used. Memory 
20K, and no other special features required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

CBDEBING INFORMATION: PROGRAM NUMBER 16213060077 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



HOMOGENEITY OF VARIANCE TEST AND T TEST USU 32 

AUTHOR: Dinesh G. Patei 

DIRECT TECHNICAL INQUIRIES TO: 
Dinesh G. Patei 
Computer Center 
Utah State University 
Logan, Utah 

DESCRIPTION - Eartletts test of homogeneity of variance 
and T test, two groups at a tine, for all possible 
combinations. Analysis of variance (unadjusted) as a by- 
product. 

MINIMUM SYSTEM BEQUIREMENTS - Memory 40K and Indirect 
Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE BEADABLE - None. 

OEDEBING IHFOBBATICN: PROGRAM NUMBER 1620060081 



1620306.^078 

HJIBULL ANALYSIS PACKAGE 



AUTHOB: 



E. Hilder 



Indicate "B N 1" in cclumns 1-3 and the PrograE Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
B. E. Hilder 
Motorola, Inc. 
5005 E. McDowell Road 
Phoenix, Arizona 



1620-06.0.082 

TWO HAY INDEPENDENCE CHI-SQUARE ANALYSIS* COUNT TABLE 
OR MI DA.TA.4. USU 22 

AUTHOB: Bex L. Hurst 



DESCRIPTION - The package consists of eight programs which 
will perform a Heibull Beliability Analysis. The programs 
can be used in varying sequences. Memory 20K, paper tape, 
and no other special features reguired. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDERING INFOBMATION: PROGRAM NUMBER 1620060078 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



DIBECT TECHNICAL INQUIEIES TO: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - Hill compute two way Chi-Square analysis 
from either the two way count table or will compute the 
two way count table from raw data and proceed. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, Indirect 
Addressing and Additional Instructions to enable FORCOM 
to be added to FORTRAN Format. 



CONTRIBUTED PROGRAMS 



CONTINUED FRCM PRIOR PAGE 



CONTINUED FROH PRIOR CCLUMN 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only, 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060082 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06^0^283 

ANALYSIS OF VARIANCE - RECTANGULAR LATTICE DESIGN USU 51 



Rex 1. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - Bill compute a single Latin square analysis 
of variance or will compute any number of single latin 
square analyses of variance of. the same dimensions and 
compute a pooled analysis of variance. 

MINIMUM SYSTEM REQUIREMENTS - Memory 40K, Indirect 
Addressing, and Additional Instructions to enable FORCOH 
to be added to FORTRAN Format. 



AUTHOE: 



Rex I. Hurst 



DIRECT TECHNICAL INQUIRIES TO: 
Eex 1. Hurst 
Utah State university 
Computer Center 
Logan, Utah 

DESCRIPTION - Computes the analysis of variance, unadjusted 
means, adjusted means and pertinent statistics for 
rectangular lattice designs. 

MINIMUM SYSTEM REQUIREMENTS - Memory 40K, and Additional 
Instructions to enable FOECOM to be added to FORTRAN Format. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGRAM NUMBER 1620060063 

Indicate M E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



MODEL BUILDING IN MULTIPLE REGRESSION OSU 15* .16 

AUTHOR: Rex I. Hurst 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060086 

Indicate n B N 1" in columns 1-3 and the Prograi Number 
in columns 1-13 on the IBM Program Order Form. 



1620-06.0.087 

MiLYSIS OF VARIANCE 



REPEATED RANDOMIZED BLOCKS USD \2 



AUTHOR: 



Rex L. Hurst 



DIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - Hill compute a single randomized block 
analysis of variance or will compute any number of single 
randomized blocks analyses of variance of the same 
dimensions and pool them into a pooled analysis of variance. 

MINIMUM SYSTEM REQUIREMENTS - Memory 40K, Indirect 
Addressing, and Additional Instructions to enable FORCOM 
to be added to FORTRAN Format. 



EIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - To provide basic data reduction techniques 
to enable research workers to evaluate the possible 
necessary terms in a multiple regression model. Provides 
tables for a graphic approach to looking at all possible 
main effects and first order interactions in multiple 
regression problem. 



MINIMUM SYSTEM REQUIREMENTS 
and Indirect Addressing. 



memory 40K, Automatic Divide, 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060084 

Indicate M E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060087 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.088 

UCRBL 54- ANALYSIS OF VARIANCE /FACTORIAL DESIGN BITH 
NESTING OFTION1 UCSBl 54 



AUTHOR: 



Garber 



DIRECT TECHNICAL INQUIRIES TO: 
M. J. Garber 

University of California 
Biometrical Lab. 
Riverside, California 

DESCRIPTION - Computes means and adjusted sums of sguares 
with the following options for any combination: 



1620-06.0.885 

PROBIT ANALYSIS 



AUTHORS: Dr. R. J. Daum 
Gary Bearden 



Clyde Givens 



DIRECT TECHNICAL INQUIRIES TO: 
-Dr. F. J. Daum 

U. S. Department of Agriculture 
Eioaetrical Services 
Beltsville, Maryland 

DESCRIPTION - An iterative procedure is used to obtain 
a weighted linear regression of PROBIT-response on LOG 
sub 10 (dose) where the responses are quantal. The 
procedure used is that described in PROBIT analysis by 
B. J. Finney, Cambridge University Press, 1952. 

MINIMUM SYSTEM REQUIREMENTS - 20K card system with Auto 
Divide. 



SUM OF SQUARES 



Yes 
Yes 



MINIMUM SYSTEM REQUIREMENTS 



MEANS 

No 
No 
Yes 

A 1620 with 40K. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060088 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^06^.0^090 

COMPLETELY GENERALIZED ANOV 



BASIC EROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060085 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.086 

ANALYSIS g? VARIANCE-REPEATED LATIN SQUARES USU 31 



AUTHOR: Rex L. Burst 

EIRECT TECHNICAL INQUIRIES TO: 



AUTHOR: Allan I. Heath 

DIRECT TECHNICAL INQUIRIES TO: 
Allan L. Heath 
Biometrical Services, ARS 
Agricultural Research Center 
Beltsville, Maryland 

DESCRIPTION - The program computes an analysis of variance 
for any factorial of pseudo-factorial experiment where 
subclass numbers are balanced. Selected subclass means 
may be obtained at the option of the operator. All sources 
or any selected sources in the analysis of variance, 
including both cross classified and/or nested effects, 
are under operator option. This program will handle up 
to 18 factors with a maximum of 999 levels per factor. 
All data must be stored prior to the computation of the 



CONTRIBUTED PROGRAMS 



PAGE 052 1620 

CONTINUED FROM PRIOB PAGE 

analysis. The data field nay be of any size, located in 
any position on the detail card, with the only restriction 
being that the total uncorrected sun of sguares nay not 
exceed 34 digits. 

MINIMUM SYSTEM REQUIREMENTS - 20K memory. Automatic Divide, 
Indirect Addressing, 1622. 

BASIC PROGBAH PACKAGE 

DOCUMENTATION - flrite-up on Hicrofiche only. 
MACHINE READABLE - None. 

OBDEBIMG INFORMATION: PROGRAM NOHBER 1620060090 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620 z 06.-0..jm 

PRINCIPAL AXES FACTOR ANALYSIS USING HOTELLIBGS ITER ATIV E 

EEOCEDURE 

AUTHOR: Thomas C. Teeples 

DIRECT TECHNICAL INQUIRIES TO: 
Thomas C. Teeples 
HUMRRO 

2013 G Street N. W. 
Washington, D. C. 

DESCRIPTION - Extracts any number of factors from 
correlation matrix. Trace of matrix is computed and printed 
out. The sum of sguares of each set of factor loadings 
{latent root) is computed and printed out. Also the 
cumulative percentage of total variance accounted for is 
printed out. Program pauses after each factor. Pushing 
start causes another factor to be extracted. 

MINIMUM SYSTEM REQUIREMENTS - 19,999 positions, memory 
20K and Automatic Divide. 

BASIC PROGRAM PACKAGE 

documentation - Write-up on Hicrofiche only. 
MACHINE BEADABIE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060091 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



CONTINUED FROM PBIOB COLUMN 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620060094 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



1620-06.0.095 

FREQUENCY DISTRIBUTION GENERATOR PROGRAM z SINGLE AND 
DOUBLE COLUMN 

AUTHOR: Howard Givner 

DIRECT TECHNICAL INQUIRIES TO: 
Howard Givner 
Brooklyn College 
Testing and research 
Brooklyn 10, New York 

DESCRIPTION - This program is designed to compute the 
absolute frequency and percentage of response for each 
of 10 digits (0-9) in a column, or each of 100 two-digit 
combinations (00-99) in a field. The program will handle 
80 single column fields or 40 double column fields as well 
as any combination of single and two-digit fields occupying 
an 80-column card at maximum and up to 9,999 cases. There 
is no required format since data format is under the control 
of a header (parameter) card. Other information, not to 
be processed by the program may appear elsewhere en the 
data card and may be non-numerical. The program gives 
options to type out or punch out and to compute or not 
compute percentages. 

PROGRAMMING SYSTEMS - Written in Machine Language. 

MINIMUM SYSTEM REQUIREMENTS - Basic 1620-1622 System. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 

MACHINE READABLE - None. 
ORDERING INFORMATION: PROGRAM NUMBER 1620060295 

Indicate "B N 1 M in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.096 

STUDENT T TEST 



1620^06^0^093 

FRCBIT ANALYSIS 



AUTHOR: 



E. Hilner 



AUTHOR: 



M. J. Garber 



DIRECT TECHNICAL INQUIRIES TO: 
M. J. Garber 

University of California 
Eiometrical Lab. 
Riverside , California 

DESCRIPTION - Calculation of the constants of the probit 
regression line. Dosage levels may fce retained in their 
input scale or transformed to log{10). Natural mortality 
may be set equal to or greater than zero. 

PROGRAMMING SYSTEMS - Coded in Format FORTRAN for Floating 
Point Arithentic. 

MINIMUM SYSTEM REQUIREMENTS - Memory 40K, and no Other 
special features required. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060093 

Indicate "E n 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
W. E. Milner 

North Texas State university 
Computer Center 
Denton, Texas 

DESCRIPTION - To compute the T test of significance between 
from two to fifty columns of data. 



PROGRAMMING SYSTEM 
Format) . 



Written in FORTRAN Language (non- 
Memory 20K, and no other 



MINIMUM SYSTEH REQUIREMENTS 
special features reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060096 

Indicate "B N 1 H in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.097 

SIMPLE CORRELATION COEFFICIENT MATRIX WITH MISSING DATA 
POINTS 



1620r06.0_.e94 

lillMAX .MATRIX ROTATION 

AUTHOR: Thomas C. Teeples 

DIRECT TECHNICAL INQUIRIES TO: 
Thomas c Teeples 
George Washington University 
Human Resources Research Office 
2013 G. Street, N.W. 
Washington, D.c. 

DESCRIPTION - This program uses the output from the 
principal axes factor analysis program by the same author. 
The factor loadings are stored, communalities computed, 
square roots of communalities punched, matrix is normalized, 
rotated, denormalized, and punched. 

PROGRAMMING SYSTEM - FORTRAN with Format, Floating Point. 

MINIMUM SYSTEH REQUIBEMENTS - Memory 20K, Automatic Divide, 
and no other special features reguired. 



AUTHOR: 



E. Hilner 



DIRECT TECHNICAL INQUIRIES TO: 
w. E. Hilner 

North Texas State University 
Computer Center 
Denton, Texas 

DESCRIPTION - To compute all possible correlation 
coefficients from an input matrix. The data may have 
missing points within a set, yet the entire set is not 
deleted. Written in FORTRAN; requires (card system) 20K 
memory and no special features. 

BASIC PROGRAM FACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060097 

Indicate "B N T" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



BASIC PROGRAM PACKAGE 



CONTRIBUTED PROGRAMS 



1620^06^.0.098 

INDEX OF ORDER OF ASSOCIATION 



AUTHOR: 



William X. Milner 



DIRECT TECHNICAL INQUIRIES TO: 
William E. Milner 
North Texas State University 
Computer center 
Denton, Texas 

DESCRIPTION - To compute the index of order of association 
for up to a 10 x 10 matrix, see statistics, a new approach, 
by Wallis and Roberts. 

PBOGBAHHING SYSTEH - Writen in FORTRAN (non-Format). 

HINIHUH SYSTEM REQUIREMENTS - Any 1620 with FORTEAN. 



CONTINUED FROM PRIOR COLUMN 

Running time - this is a function of the number of data 
points to be considered. 

HINIHUH SYSTEM REQUIREMENTS - Any computer with the ability 
to compile 1620 FORTRAN with format. The memory limitation 
is 40K, however, the program as listed was compiled on 
a 60K machine with Automatic Divide hardware. Program 
compilation - it will be necessary to compile the cource 
statements for each different machine configuration. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060101 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns it-13 on the IBM Program Order Porn. 



EASIC PEOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACBINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 162006098 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



162Jt06.-J_.g99 

CHI SQUAR E 

AUTHOR: William e. Milner 

DIRECT TECHNICAL INQUIRIES TO: 
William E. Milner 
North Texas state University 
Computer Center 
Denton, Texas 

DESCRIPTION - To simply calculate CHI square without the 
normally complex programs available. 



PROGRAMMING SYSTEH 



Written in FORTRAN (non- Format) . 



MINIMUM SYSTEM REQUIREMENTS - Card system, memory 20K, 
and no other special features required. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OEDEBING INFORMATION: PROGRAM NUMBER 1620060099 

Indicate "E N 1" in columns 1-3 and the Frogram Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.102 

ilAUSIS QF VARIANCE 



AUTHOR: 



Garber 



DIRECT TECHNICAL INQUIRIES TO: 
M. J. Garber 

University of California, Biometrical Lab. 
Riverside 
California 

DESCRIPTION - Analysis of variance of data for a 2**n 
factorial design for n between 2 and 10 factors, inclusive. 
The total effect and sum of sguares will be calculated 
for any or all single degrees of freedom. Input data may 
be single observations, sums of observations, or means 
of observations. 

MINIMUM SYSTEMS BEQUIBEMENTS - A 1620 with Pleating Point. 

PBOGRAMMING SYSTEM - Format FORTRAN. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060102 

Indicate "B N 1" in cclumns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



J620--06_.ei._i03 

FACTOR ANALYSIS - CENTBOID HETHOD 



ADTHOE: 



Garber 



1620-06^0^100 

NEWTONS FORWARD INTJI£OLATION 



AUTHOR: 



William E. Milner 



DIEECT TECHNICAL INQUIRIES TO: 
William E. Hilner 
North Texas state University 
Computer Center 
Denton, Texas 

DESCRIPTION - To calculate a polynomial from a set of point 
sets using Newtons Forward Interpolation Method. 



MINIMUM SYSTEM REQUIREMENTS - Card system 
and no other special features required. 



Memory 20K, 



EASIC PRCGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

OEDEEING INFORMATION: PROGRAM NUMBER 1620060100 



DIRECT TECHNICAL INQUIRIES TO: 
M. J. Garber 
University of California 
Biometrical Lab. 
Riverside, California 

DESCRIPTION - Factor Analysis of a correlation matrix using 
the centroid method of factoring. Equipment specifications: 
1620 card. Format FORTRAN - Floating Point. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
HACHINE BEADABLE - None. 

ORDERING INFORHATICN: PROGRAH NUMBER 1620060103 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620-06_.0_._104 

COBBELATION MATRIX WITH OUTPUT IN MATRIX FORM 



Indicate M E N 1 M in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-06.0.101 

DATE ANALYSIS PROGRAM 

AUTHORS: A. J. Santilli F.N. Wood 

DIRECT TECBNICAL INQUIRIES TO: 
A. J. Santilli 

Research and Development Department 
National Steel Corporation 
Weirton Steel Company Division 
Weirton, West Virginia 

DESCRIPTION - To enable one to determine from a given set 
of data (the following) what functional relationship exists 
and how well this relationship describes the data presented. 
1. A scatter plot of the data. 2. A plot of the average 
values. 3. A simple correlation analysis. 4. A possibility 
of six different least sguares fits. 5. A test for the 
goodness of the chosen fit. 6. A plot of the chosen fit 
or a group of fits on the original data. 

PROGRAMMING SYSTEMS - Written in FORTRAN with Format. 



AUTHOR: 



K. Olson, Jr. 



DIRECT TECHNICAL INCUIBIES TO: 

P. K. Olson, Jr. 
NBOTC Unit 
Miami University 
Oxford, Ohio 

DESCRIPTION - This program is designed to compute mean, 
standard deviation and Pearsons correlation coefficient 
for from two to fifty-two variables. The distinguishing 
feature of this program (compared with other programs which 
compute Pearsons correlation coefficient) is that the 
computed correlations are punched in a matrix form which 
mafces identification of values easy. Card system, memory 
40K, Automatic Divide, Indirect Addressing is required. 
Written in FORTRAN II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDEBING INFOBMATION: PROGRAM NUMBER 1620060104 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR COLUMN 



1620-06 -0.J05 

ANALYSIS OF VARIANCE = PABTIALLY BALANCED LATTICE - USD 5.2 

AUTHOR: Etex L. Hurst 

DIRECT TECHNICAL INQUIRIES TC: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - Computes the analysis of variance, unadjusted 
and adjusted treatment means, and pertinent statistics 
for a partially balanced lattice design. Subsampling 
optional. Standardized card fern not reguired- Additional 
instructions are necessary to allow usage of FORCOM 
subroutines, FORTRAN Format plus FORCOM subroutines. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060105 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



I620-06..0..J06 

HI OR GEO METRIC STATISTICS - HYPRG 

AUTHORS: w. H. Robertson H. E. Anderson 

DIRECT TECHNICAL INQUIRIES TC: 
H. E. Anderson 

Div. 1442, Sandia Corporation 
Sandia Base 
Albuquerque, New Mexico 

DESCRIPTION - Computes discrete points of the cumulative 
hypergeometric distribution, i. e., operating characteristic 
curves, for given lot and sample size, acceptance number, 
and probability level, second option produces only the 
upper and lower confidence limits on the fraction defective 
of a finite population. Card system, memory 40K, Automatic 
Divide and Indirect Addressing. FORTRAN II (easily adapted 
for FORTRAN with Format for smaller machine). 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060106 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060109 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.110 

ANAL1SIS OF VARIANCE 



UNEQUAL SUBCLASS IRE^OENCIES^CRBLej 



AOTHOR: 



R. C. Noble 



DIRECT TECHNICAL INQUIRIES TO: 
N. J. Garber 
University of California 
Biometrical Lab. 
Riverside, California 

DESCRIPTION - Analysis of variance of data with unequal 
subclass frequencies, either proportionate or 
disproportionate, A disproportionate set of subclass 
frequencies will have constants fitted and interaction 
will be tested. Written in specially modified Format- 
FORTRAN for paper tape. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060110 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.111 

1MD0M EXPONENTIAL NUMBER GENERATOR SUBPROGRAM 



G-. Marsaglia 



1620^06^0^107 

COVARIANCE ANALYSIS - RANDOMIZED BLOCK DESIGN 

MULTIPLE USU 10 



SIMPLE OR 



AUTHOR: 



Rex L. Hurst 



DIRECT TECHNICAL INQUIRIES TC: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - This program was written to serve as a utility 
program in a statistical service laboratory. Only a limited 
control of card form is assumed. The output is labeled 
profusely. Memory 40K - Automatic Divide - Indirect 
Addressing - ana additional instructions to enable FORCOM 
to be added to FORTRAN format. The read loop may be 
rewritten to eliminate the need for FCSCCH. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060107 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



162 0-06.6.109 

»HALYSIS OF VARIANCE AND COVARIANCE 

AUTHOR: Eleanor Beckwith 

DIRECT TECHNICAL INQUIRIES TC: 
M. J. Garber 

University of California 
Biometrical Lab. 
Riverside, California 



AUTHORS: H. D. HacLaren 
T. A. Eray 

DIRECT TECHNICAL INQUIRIES TO: 
T. A. Bray 

Boeing Scientific Res. Laboratories 
P. 0. Box 3981 
Seattle 24, Washington 

DESCRIPTION - A FORTRAN II function subprogram to generate 
a sequence of random exponential variables with mean one. 
FORTRAN II minimum requirements. The subprogram is coded 
in the SPS language for use as a FORTRAN II function 
subprogram which may be used in any FORTRAN II program 
with standard mantissa length (f equals 8) . The average 
time required to generate an exponential random number 
is approximately 11 ms. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060111 



Indicate "I 
in columns 



N 1" in columns 1-3 and the Program Number 
4-13 en the IBM Program Order Form. 



1620-06.0.112 

HOTELLINGS T-SQUARE 

AUTHOR: G. E. Culbertson 

DIRECT TECHNICAL INQUIRIES TO: 
G. E. Culbertson 
Hercules Powder Co. 
Radford, Virginia 

DESCRIPTION - This program is designed to compute the T- 
square value and connect it to a F value using the formulas 
of Hotelling. The program, as written, can handle at most 
the variates while the number of observations is unlimited. 
Users with more than 20K storage may increase the number 
of variates by making appropriate changes in the dimension 
statements. 1620 20K with card input and output. Written 
in FORTRAN. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060112 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DESCRIPTION - Analysis of variance and covariance for 2 
less than or egual to K less than or equal to 4 factors 
in a balanced factorial design. Additionally, the error 
sum of sguares is pooled with each effect sum of squares 
for later use in testing adjusted effects. Memory 40K. 
Written in specially modified Format-FCRTRAN. Floating 
Point. 



1620 z 06 j: .0. s _113 

ANALYSIS OF VARIJNCEi CROSS-OVER DESIGN 

AUTHOR: Rex L. Hurst 

DIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State university 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

Computer Center 
Logan, Utah 

DESCRIPTION - Computes the analysis of variance, treatment 
leans and other statistics for a cross-over design. A 
standard card form is not reguired. As written the program 
reguires Additional Instructions to enable FOBCOM to be 
added to FORTRAN format. The program may be easily modified 
to use straight FORTRAN Format without FOBCOM. This will 
reguire a rigid card form. 1620 with card I/O and 40K, 
Automatic Divide and Indirect Addressing are reguirea. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060113 

Indicate "E N 1 n in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06. 0.11J 

CORRELATION PROGRAM FOR SYMMETRIC AND ASYMMETRIC MATRICES 

AUTBOR: H. E. Bright 

DIRECT TECHNICAL INQUIRIES TO: 
B. E. Bright 

Data Processing and Computing Center 
Southern Illinois University 
carbondale, Illinois 

DESCRIPTION - This program, which will handle up to 999 
variables, will compute all possible simple pairwise 
correlation coefficients among a set of variables or between 
two sets of variables. Variables may be from one to ten 
digits in length. There may be as many as 999 variables 
and 99999 observations, storage reguireaents: The entire 
core (40K) memory is utilized. The following are required: 
Card input/output, 40K, Indirect Addressing, ana Move Flag. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFCRHATICN: PROGRAM NUMEES 1620060114 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTINUED FROM PRICB COLUMN 

Language. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060116 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 = 06.0.117 

ESTIMATION OF CONSTANTS IN THE NEGATIVE BINOMIAL 

DISTRIBUTION 

AUTHOR: C. J. Gardner 
DIRECT TECHNICAL INQUIRIES TO: 

C. J. Gardner 

Applied Mathematics Section 

Mgmt. Systems Development Department 

Eastman Kodak Co. 

Rochester 4, New York 

DESCRIPTION - The purpose of this program is to estimate 
the constants K, P, ana Q in the Negative Binomial 
Distribution. It will also calculate expected frequencies 
from the estimated values of the parameters or from values 
given as input. It will calculate values of X sguare and 
cumulative probabilities. The number of cells must be 
less than or equal to 100. Memory O0K, cards with Automatic 
Divide and Indirect Addressing. The program was written 
in FORTRAN Language. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060117 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 = 06^2.V?8 

CURVE FITTING JUCRBL 00651 



AUTHOR: 



Garber 



!620 = 06.0.ri5 

IJ1CENTILE SCORES FREQUENCY DISTRIBUTIONS^ AND CUMULATIVE 
FREQUENCIES " "" ' ~~" 

AUTHOR: B. E. Bright 

DIRECT TECHNICAL INQUIRIES TO: 
H. E. Bright 

Data Processing and Computing Center 
Southern Illinois University 
Carbondale, Illinois 

DESCRIPTION - This program punches percentiles, frequency 
distributions, ana cumulative freguencies from scores read 
in on data cards. Its advantages come from the variability 
and in seme cases the size of the following: (1) score 
range, (2) number of variables, (3) location of variables 
on the input cards, (4) intervals, (5) missing data, (6) 
storage allocations. The following features are reguired: 
Card input-output. Indirect Addressing, 20K, Move Flag, 
Transfer Numerical Strip, and Transfer Numerical Fill. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060115 

Indicate "E N 1" in columns 1-3 ana the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.. 0.. 116 

■E35JJ CURVES FOR THE NEGATIVE. BINOMIAL DISTRIBUTION 



AUTHOR: 



C. J. Gardner 



DIRECT TECHNICAL INQUIRIES TO: 
C. J. Gardner 

Applied Mathematics Section 
Mgmt. Systems Development Department 
Eastman Kodak Co. 
Rochester 4, New York 

DESCRIPTION - The purpose of this program is to calculate 
power curves for a test of significance on the average 
of a sample cf N observations each of which is independently 
distributed as a negative binomial distribution with 
parameters K, P and Q. The program will calculate power 
curves for left, two, ana right tail tests. Values of 
the average, the parameter K an3 the desired sample size 
must be entered as data. Critical points may be calculated 
internally by giving the desired level of Type I error 
or may be entered as data. Memory 40K, Automatic Divide 
and Indirect Addressing. The program is written in FORTRAN 



DIRECT TECHNICAL INQUIRIES TO: 

M. J. Garber 

University of California 
Biometrical Lab. 
Riverside, California 

DESCRIPTION - Curve fitting by multiple regression 
procedures. The polynomial fit, Y sub J equals the sum 
of B sub I times I divided by J, for I egual 0, 1,...,K, 
is developed up to a maximum tenth degree. Standard errors 
of the regression coefficients are computed if the total 
R sguare (square of the multiple correlation coefficient) 
is less than 1.0. Card I/O and a memory of 40K. Britten 
in a moaified version of Format FORTRAN Floating Point. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060118 

Indicate »B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.120 

VARIABLE PRECISION MULTIPLE REGRESSION AND VJRIAB.LJ 
PRECISION MATRIX INVERSION PACKAGE 

AUTHOR: Lew D. Harkins 

DIRECT TECHNICAL INQUIRIES TO: 
Lew D. Harkins 
Lousisana State University 
Computer Research Center 
Baton Rouge, Louisiana 

DESCRIPTION - Regression Program: Utilizes a selective 
input format, determines proper field sizes and accumulates 
sums of sguares and cross products in fixed point. Converts 
to variable length Floating Point for regression 
calculations. Operator can select precision carried in 
computations (2-90 digits). All stanaara regression terms 
are calculated. More than one regression eguation may 
be fitted without re-entering data. 

Inversion program: Can be used as an accuracy check for 
the regression program as well as independently for 
inversion of symmetric matrices. Operator can select 
precision carried in computations. Both programs determine 
maximum precision available based on storage space for 
each problem. 1620 with Card I/O, Indirect Addressing, 
Special Instruction Set No. 1021, and variable length 
Floating Point hardware. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 



CONTRIBUTED PROGRAMS 



PAGE 056 1620 

CONTINUED FUOM PBIOB PAGE 

BACHINE BEADABLE - Hone. 

OHDEBIBG INFORMATION: PBOGBAB NUHBEB 1620060120 

Indicate "E N 1" in columns 1-3 and the Program Nunber 
in columns 4-13 on the IBB Program Order Form. 



COHTINOED PBOH PBIOB CCLOHN 

BASIC PROGBAB PACKAGE 

DOCUMENTATION - Brite-up on Hicrofiche only. 
MACHINE READABLE - None. 

OBDERING INFORMATION: PEOGBAM NUMBER 1620060123 

Indicate "B N 1" in cclumns 1-3 and the Program Number 
in colunns 4-13 on the IBN Program Order Form. 



1620-06^0^21 

HISSING DATA CORRELATION PROGBAB FOR SYMMETRIC AND 
ASYMMETRIC MATRICES 

ADTHOB: Hillias E. Bright 

DIRECT TECHNICAL INQDIBIES TO: 
Billiaa E. Bright 
Southern Illinois University 
Corbondale, Illinois 

DESCBIPTIOH - This program, which will handle up to 999 
variables, will compute all possible simple pair-wise 
correlation coefficients among a set of variables or between 
two sets of variables, with or without missing data. 
Variables nay be from one to ten digits in length. The 
maximum number of variables in a study depends on several 
factors: The smallest maximum is 277, and the largest 
is 999. There may be as many as 99999 observations. Suns 
are accumulated as fixed-point numbers, means are truncated 
to five decimals, standard deviations are rounded to five 
decimals, and correlation coefficients are rounded to six 
decimals. The following features are reguired: Card 
input/output. Indirect Addressing, 40K, BF, and THS. The 
program may be altered for 20K and 60K. 

BASIC PBOGBAH PACKAGE 

DOCOMEHTATICH -■ Brite-up on Hicrofiche only. 
BACHINE READABLE - Hone. 

ORDERING INFORMATION: PROGBAH NUHBEB 1620060121 

Indicate "B N 1" in columns 1-3 and the Program Nunber 
in columns 1-13 on the IBB Program Order Form. 



1620206.0^22 

THAI " TRJNS FORMATION AX REGRESSION ANALYSIS PBOGBAH 

AOTHOBS: J. F. Buldoon A. J. Capato 

DIRECT TECHNICAL INQUIRIES TO: 
J. F. Buldoon 

Chemical Engineering Department 
Columbia University 
New Tork 27, New York 

DESCBIPTIOH - This program fits by least squares technique 
a functional relationship of the form F (1) eguals A plus 
B G (X) to data pairs (Y, X). The functions F and G are 
chosen from among 22 transformations that may be applied 
tc the raw data (including the identity). The restricted 
form F (Y) eguals B G (X) is also handled at the operator's 
discretion. Primary output is composed of estimates and 
variance of estimates of A and B, residual variance of 
fit, correlation coefficient, means and variances F (Y) 
and G (X) and the transformed point (F (Y) , (X) ) for each 
(X,Y) point. Secondary optional output includes deviations 
of point from line and true confidence limit curves for 
fit at 90, 95, and 99 per cent confidence levels using 
built-in T-tables. Original data are not destroyed and 
program may be restarted by Sense Switch option to perform 
different transformations on same data. Bestrictions/Range: 
Up to 250 data points may be handled by program as written. 
This nay be easily modified with new DIMENSION statement. 
Storage requirements: 37,000 digits. Equipment 
specifications: IBH 1620, 60K Card Bead/Punch. Britten 
in FORTRAN with Format. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060122 

Indicate "E H 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBH Program Order Form. 



1620 Z 06 J1 1.J23 

ANALYSIS OF VARIANCE RANDOMIZER COMPLETE BLOCK DESIGN,. 
INDIVIEUAL AND CCMB^ STATION SUMMARIES 

AUTHOR: Donald Peterson 

DIRECT TECHNICAL INQUIRIES TO: 
Donald Peterson 
Data Processing laboratory 
North Dakota state university 
Fargo, North Dakota 

DESCRIPTION - Randomized Complete Block Design - giving 
analysis cf variance by station and summary of all stations. 
Mathematical Method: Conventional statistical procedure. 
Restrictions/Range: 40 treatments - 6 replications. 
Storage Requirements: 20K. Equipment Specifications: 
Benory 20K. No Automatic Divide. No Indirect Addressing. 
No other special features reguired. Language: Fixed/Float 
Relocatability. 



16 20- 06_. 0^121 

fiUNCANS MULTIPLE RANGE TEST. USING HARTBBS CRITICAL VALUES^ 
POB P UVELS OF iJMxiUxil^S 



AOTHOBS: H. A. Fribourg 



F. Ling 



DIBECT TECHNICAL INQOIBIES TO: 
H. A. Fribourg 
Department of Agronomy 
University of Tennessee 
Knoxville, Tennessee 

DESCRIPTION - To rank means in ascending order, together 
with their respective identification, and to calculate 
the shortest significant ranges, according to Duncans 
Htjltiple Range Test (Biometrics 11-1-42, 1955) using Barters 
Critical Values (Bionetrics 16-671-685, 1960.) Card 
input/output. Equipment specifications: 60K Automatic 
Divide. Indirect Addressing: THS, TNF, and HE. Language: 
Fixed/Float Relocatability (Optional: Running tine; 
Approximate nunber of times run successfully: Programming 
Hours). FORTRAN II, with FORCOH (GET Subroutine) data 
and identification input can te located by FOECOW any where 
in the card, or can be taken directly from Randomized 
Complete Block program output (6.0.069) on Sense switch 
control. Any one of the five tables published by Harter 
can be used for any one run at a specified level of 
probability. Hester card is needed to provide number of 
degrees of freedom for error, number of observation per 
mean, number of means, error variance estimate, probability 
level, and locations of data and of identification. 

BASIC PROGRAH PACKAGE 

DOCUHENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERIHG INFORHATION: PBOGBAH NUBBER 1620060124 

indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 1-13 on the IBB Program Order Forn. 



16 2 0^06 -JUI 2 7 

OGIVE FREfiUESCY CURVE PROGRAM 

AUTHOB: K. H. Brady 

DIRECT TECHNICAL INQUIRIES TO: 
K. B. Brady 

Long Island Lighting Company 
250 Old Country Road 
Hineola, New York 

DESCRIPTION - This is a two pass program to develop factcrs 
necessary for the plotting of OGIVE freguency distribution 
curves. T-241 (Pass I) This pass provides the percentage 
of bills and consunption by block and an accumulation of 
these percentages up to 100%, also, starting with 100* 
and descending to 0*. This pass provides the average use 
for the group; ratio of use to the average use (steps 
divided by average use) ; percentage of consumption in block 
related tc total consumption and an accumulation of this 
percentage to 100%. Program written in Floating Point, 
data therefore must be in Floating Point with the exception 
of rate code, month and year, and maximum entry cards. 
Both passes utilize almost all of 20K memory. Equipment 
specifications: Card system, memory 20K f and no other 
special features required. Program written in Format 
FORTRAN to allow control of input and output data. Sense 
switch 1 is also used to provide the processing of an 
individual monthly data deck, or an annual data deck. 

BASIC PROGBAB PACKAGE 

DOCUBENTATION - Brite-up on Bicrofiche only. 
BACHINE READABLE - None. 

ORDERING INFOBBATION: PROGRAM NUMBER 1620060127 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBM Program Order Form. 



1620z06_. 0^28 

~ COMPUTATION OF THE CUMULATIVE BINOMIAL POISSCN NO RMAL 
STUDENT T/CHI = Sp,UARE J PROBABILITIES 

AUTHOR: G. Balton 

DIRECT TECHNICAL INQUIRIES TO: 
G. Walton 

University of California 
312 Giannini Hall 
Berkeley, California 

DESCRIPTION - To allow the user to compute, a FORTRAN II 

routine, the probability that X less than K where K is 

a constant and X is distributed according to the binomial. 



CONTRIBUTED PROGBAMS 



CONTINUED FROM PKIOB PAGE 



CONTINUED PEOH PEIOE COLUMN 



Poisson, normal students T, chi-squared or F distribution 
with known parameters. A separate function subroutine 
is used for each distribution. Finite and infinite series. 
All of the above routines are less restrictive in terns 
of range of parameters than tables of these distributions. 
specific restrictions are included in the program write- 
ups. 

MINIMUM SYSTEM REQUIREMENTS - Card system, memory 40K, 
60K, Automatic Divide, and Indirect Addressing. 

BASIC PROGRAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE BEAEAELE - Hone. 



two or three factors. The logic nay be extended for 
additional factors but nay not be practical for this size 
of machine. Any sub natrix nay be up to the order of 50 
x 50. There nay be up to 7 continous variables, or mixture 
of covariates and right hand sides. The resultant full 
size natrix may be up to 46 x 46 with right hand sides. 
The resultant full size matrix may be up to 16 with right 
hand sides included in the 46. storage Requirements: 
40K. Equipment Specifications: 40K. Autonatic Divide: 
Indirect Addressing. Other special features reguired: 
Additional instructions to enable FOBCOM to be added to 
FORTRAN Fqrnat. FORTRAN Fornat plus FORCON. Hay be 
aodified to eliminate FORCOH but will then require rigid 
data card forms. 



ORDERING INFORMATION: PROGRAM NUMBER 1620060128 



Indicate n B N 1" in colunns 1-3 and the Program Number 
in columns 4-13 on the IBH Prograa Order Form. 



BASIC PROGRAM PACKAGE 

DOCUHEHTATION - Write-up on Microfiche only. 
MACHINE READABLE - Hone. 

OBDERING INFORMATION: PROGRAM NUMBER 1620060132 



1620.306^0^130 

DIGIT COUNTING USU-II 



Indicate "B N 1" in colunns 1-3 and the Program Number 
in colunns 4-13 on the IBH Program Order Fori. 



AUTHORS: D. V. Sisson W. I. Pope 

DIRECT TECHNICAL INQUIRIES TO: 
D. V. Sisson 
Computer Center, Utah 
State University 
Logan, Utah 

DESCRIPTION - Counts the number of times each digit, zero 
through nine, occurs in a card column or series of columns. 
Used in obtaining one and two-way count tables. 
Mathematical Method: Card counts are accumulated in fixed 
point for each punching position of each column. 
Bestrictions/Bange: Only numeric punches should be used 
and no group should contain more than 9999 cards. Each 
column is treated as a separate field. Storage 
Requirements: 40K. Equipnent Specifications: 40K. 
Automatic Divide: Yes. Indirect Addressing: Yes. The 
language is FOBTBAN. 

BASIC PROGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLB - None. 

ORDERING INFORMATION: PBOGBAB NUMBER 1620060130 

Indicate H B N 1" in columns 1-3 and the Progran Number 
in colunns 4-13 on the IBH Progran Order Form. 



1620-06.0.134 

NON-LINEAR LEAST -SQUA RES CURVE FITTING PBOGBAH 

AUTHOR: G. Struble 

DIRECT TECHNICAL INQUIRIES TO: 
G. Struble 

Statistical Laboratory and Computing Center 
^ University of Oregon 
Eugene, Oregon 

DESCRIPTION - Fits finite number of points with a function 

of arbitrary non-linear form, in least-squares sense. 
Form of function must be supplied in FORTRAN II subroutine 
by the user. Method is Newton iteration from first guess 
at paraneters in function, each iteration linearizing 
function at current estimate of paraneters. Restrictions: 
Handles an unlimited number of observations or up to 8 
independent variables. 1 dependent variable, and functions 
of up to 6 parameters. Newton iteration method does not 
always converge for all functions and all initial guess. 

PROGRAMMING SYSTEMS - Britten in FORTRAN II. 

MINIMUM SYSTEM REQUIREMENTS - 40K, card system. Auto Divide, 
indirect Addressing, FOBTBAN II nainline, requires 
subroutines. 



1620-06. 0.131 

BIOftSSAY ANALYSIS/PARLOW 



AUTHOR: 



Sisson 



DIBBCT TECHNICAL INQUIRIES TO: 

D. V. Sisson 
Computer Center 
Utah state University 
Logan, Utah 

DESCRIPTION - Computes all group totals and neans, detailed 
analysis of variance with partitioned group sun of squares, 
natural logs of the relative potencies, and natural logs 
of the confidence intervals for the relative potencies. 
Mathematical Method: Basic statistical procedures. 
Restrictions/Range: Maximum of 50 preparations including 
control, 2 levels, and no more than 999 cbservations in 
any group. Storage Requirements: 40K, unless recompiled 
with new dinension statements. Equipment Specifications: 
Memory 40K. Autonatic Divide: Yes. Indirect Addressing: 
Yes. Program is written in FOBTBAN. 

BASIC PBOGBAH PACKAGE 

documentation - write-up on Microfiche only. 

MACHINE READABLE - None. 

OBDERING INFORMATION: PROGRAM NUMBER 1620060131 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBM Program Order Forn. 



1620-06.0.132 

BNJLISIS OE VARIANCE AND COVARIAN CE-U NEQUAL SUBCLASS 
FREQUENCIES 

AUTHOR: B. L. Hurst 

DIRECT TECHNICAL INQDIBIES TO: 
R. I. Hurst 
Utah State university 
computer Center 
Logan, Utah 

DESCRIPTION - This series of programs computes the count 
matrix and right hand sides of the infornation natrix fron 
raw data cards, elininates dependencies, inverts the full 
rank infornation natrix, computes the solution vector 
and conputes the sums of squares due to subsets and linear 
hypothesis of the coefficients. It may be used for 
covariance situations. General least sguares. 
Restrictions/Range: The program as written works for one. 



BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060134 

Indicate "B N 1" in colunns 1-3 and the Progran Number 
in colunns 4-13 on the IBH Program Order Forn. 



1620-06.0.135 

12M ANALYSIS ANE SCORING 



AUTHOB: 



H. Givner 



DIRECT TECHNICAL INQUIRIES TO: 
H. Givner 

office of Testing and Research 
Brooklyn College 
Bedford Avenue 5 Avenue H. 
Brooklyn 10, New York 

DESCRIPTION - This program is designed to do an item 
analysis and/or scoring of cards prepared by mark sense 
punching. A Format specification provides flexibility 
of input for up to 200 items and up to 999 students. The 
program furnishes a serial number for each student in the 
listing of scores. This program finds the difficulty (D) 
of each item by determining the proportion of students 
answering it correctly, and the validity (V) of each item 
by calculating the point-biserial coefficient. The mean 
score and standard deviation of the total group is also 
found. 

PROGRAMMING SYSTEMS - FORTRAN with Format, SPS - 1620/1710, 
mainline, complete. Most of the program was written in 
FORTRAN. After compilation with a FOBTRAN/Format processor, 
the I/O subroutines in the object deck were modified. 
Other changes were made to allow lists to be read. A 
Fornat decoding processor routine written in SPS was added 
to complete the prograa. This program can distinguish 
blanks, zeros and twelve punches from each other. 

MINIMUM SYSTEM REQUIREMENTS - Card system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 



ORDERING INFORMATION: PROGRAM NUMBER 1620060135 



PROGRAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USEB VOLUME 
REQUIREMENT 



CONTRIBUTED PROGRAMS 



CONTINUED FRCH PRIOR PAGE 

BASIC none 
OPTIONAL none 



1620-06.0,139 



CARDS 
none 



none 
none 



1620-06. 0.136 

MAI* STAKDARD DEVIATION, AND VARIANCE BY ROHS AND COLUMNS 



AUTHOR: 



Jack Hard 



DIRECT TECHNICAL INQUIRIES TO: 
Jack Ward 

Hestminster College 
901 Vernon Ave. 
Fulton, Missouri 

DESCRIPTION - To conpute and print the mean, standard 
deviation, and variance of an array by rows and columns 
(sense switch 4) or only by columns (no sense switch) . 
Standard methods of computation. Restrictions/Range: Op 
to 15 columns. No limit to the number of rows. This is 
a revision of Gene Milner , s FORTRAN without Format card 
program. The program is now tape FORTRAN with Format. 
Included is the same sample program and data as in 06.0.051. 
The format statements could be easily altered to allow 
for more than 15 columns. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - Tape system - Memory 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060136 

Indicate »B I 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0. 137 

CANONICAL CORR ELATION 

AUTHOR: Rex L. Hurst 

DIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - This series of two programs is part of a 
Multivariate Analysis Package. They will compute a 
canonical correlation analysis from any possible subset 
of terms used in multivariate data collection USD 55. 
They were modified from and replace 06.0.137. This program 
reguires the output of Multivariate Data Collection USU 
55, 06.0.167. 

PROGRAMMING SYSTEM - Britten in FORTRAN with Format. 

MINIMUM SYSTEM REQUIREMENTS - Eguipment required by program 
is a 40K card system. See also: 

Multivariate Data Collection USU 55 36.0.167 

Multiple Regression (I, II, III) USU 56, 58, 60 06.0.168 
Factor Analysis USU 57 06.0.169 

BASIC EROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060137 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06^0^38 

MULTIVARIATE ANALYSIS OF VARIANCE COMPLETELY RANDOMIZED 
DE5IGN-USU62 



MULTIVARIATE ANALYSIS OF VARIANCE RANDOMIZED BLOCK 
PJSIGN-USU 63 

AUTHOR: Rex L. Hurst 

DIRECT TECHHICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State university 
Computer Center 
Logan, Utah 

DESCRIPTION - Computes treatment mean vector and pertinent 
dispersion 'matrices. Provides statistics for all univariate 

and multivariate tests of equality of means. Mathematical 
method: Hilks Lambda. Restrictions/Range: Up to ten blocks, 
fifty treatments and twenty variables. Storage 
requirements: 40K. Equipment specifications - Memory 40K 
X FORTRAN Format plus FORCOM subroutines. 

BASIC PROGRAM PACKAGE ./ 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION*. PROGRAM NUMBER 1620060139 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.140 

ANALYSIS OF VARIANCE.*. 
UNEQUAL OR EQUAL N 



MEANS, AND SDS FOR SUEGR0UP5 WITH 



AUTHOR: Rex L. Hurst 

DIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State University 
computer Center 
Logan, Utah 

DESCRIPTION - Computes mean vector and dispersion matrix 
for each group. Tests equality of dispersion matrices 
and mean vectors. Mathematical method: Bartlets M and 
Wilks Lambda. Restrictions/Range: Up to twenty variables. 
Storage Requirements; 40K. Equipment Specifications: 
Memory 40K, FORTRAN Format plus FORCOM subroutines. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060138 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOR: 



Sigmund Tobias 



DIRECT TECHNICAL INQUIRIES TO: 
Sigmuna Tobias 
School of Education 
City College 

City University of New York 
135th St. and Convent Ave. 
New York 31, New York 

DESCRIPTION - Research in the Social Sciences often involves 
an unanticipated loss of subjects giving rise to an 
experimental sample with unequal number of cases, or 
observations, in the component groups. The present program 
is specifically designed for such contingencies, and will 
compute a one way analysis of variance, means, variances, 
and standard deviations even though each of the subgroups 
has a different number of subjects. The program may also 
be used for problems where an equal number of cases is 
found in each group. Output is available with several 
options, and in the typical case gives fully labeled 
analysis of variance table, and means, variances, standard 
deviations and NS for each subgroup. Standard statistical 
method is used. Storage Requirements: 20K or above. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060140 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620-06.0.141 



lIlUlF'PERSORAL PREFERENCE TEST SCORING BY THE IBM J620 

AUTHOR: Jack Hard 

DIRECT TECHNICAL INQUIRIES TO: 
Jack ward 

Director of Computer Center 
Hestminster College 
Fulton, Missouri 

DESCRIPTION - To score the EPPS on the 1620, giving scores 
and norms for the 16 scales as output. (Hand scoring 
requires 16 keys, regular machine scoring requires 8 keys.) 
Storage Requirements - Program 00403 to 03327, tables 18000 
to 19541. Equipment specifications - Tape system, memory's 
20K. The program is written in SPS. It will run on any 
size memory. Special features should not interfere. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060141 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^06.0^142 

LEAST SOJ ABES COSINE FITrlBM 7jJ4 COFIT PROGRAM ADAPTED TO 
THE IBM 1620 

AUTHOR: Juaith Koerner 

DIRECT TECHNICAL INQUIRIES TO: 
Judith Koerner 
Argonne National Laboratory 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 



CONTINUED FROM PRIOR COLUMN 



Idaho Division 
P. 0. Box 2528 
Idaho Falls, Idaho 

DESCRIPTION - Least Squares Cosine fits by a least squares 
technique the curve Y equals a COS (b) X-C) for a maximum 
of 40 observed points. Mathematical method - A least 
squares, iterative procedure. Restrictions, range - A 
maximum of 40 observed points ma; be fitted. Equipment 
specifications: Memory 20K, Automatic Divide, Indirect 
Addressing. This program was written in UTO FORTRAN. 
It takes 60 seconds to fit 15 points. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060142 



Miami University 
Oxford, Ohio 

DESCRIPTION - This program is a package of three programs 
each of which is run separately. Program 1 is titled 
(Correlation Matrix with Output in Matrix Form) and will 
output the intercorrelations for from 2 to 52 three digit 
variables in a triangular matrix which permits easy location 
of any specific correlation coefficients. The coefficient 
obtained is Pearsons (R) . Program 2 is titled (Factor 
Analysis by Thurstones centroid Method) and will extract 
up to eleven factors from the outputed correlation matrix 
of program 1. Program 3 is titled (Rotation of Factors 
by Kaisers Varimax Method) and will rotate any number of 
the outputed factors extracted by program 2. The input 
data to program 1 must be three digit integers. However, 
changing one format statement will permit input of any 
desired data. 



Indicate "E N 1" in columns 1-3 and the Program 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.143 *M 

80-S EBIES MULTIPLE LINEA R RJGBESSION SYSTEM 

AUTHOR: James N. Boles 

DIRECT TECHNICAL INQUIRIES TO: 
James N. Boles 

Dept. of Agriculture Economics 
University of California 
Berkeley, California 

DESCRIPTION - This system solves the General Multiple 
Linear Hegression problem. By means of a variety of 
transformations, it may also be used to fit curved surfaces 
to data points providing only that the. function representing 
the surface be linear in its parameters. Three alternative 
forms of regression are - (a) Stepwise, (b) Multiple 
Dependent variable, and (c) Alternate Dependent Variable. 
The system is guite flexible as to input and output. 
Options are selected mainly by control card. Complete 
residual or error analysis is provided. Storage used by 
program - 13,400. 



Written in SPS 1620/1710 Mainline 



PROGRAMMING SYSTEMS 
Complete. 

MINIMUM SYSTEM REQUIREMENTS - Equipment required by program- 
Card system. Auto Divide; program can be used on lesser 
machine. Recompile with subroutine deck without Automatic 
Divide feature. Allocation of memory is made by the program 
for each problem. The programs are independent of memory 
size. For 20, 40, and 60K memories, approximately 30, 
65 and 85 variables may be used. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060143 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



PROGRAMMING SYSTEMS - Britten in FORTRAN II Mainline 
Complete. 

MINIMUM SYSTEM REQUIREMENTS - Storage used by Program - 
Approximately 36,000 - Card system, MF, Auto Divide, 
Indirect Addressing, Floating Point hardware program can 
be used on a lesser machine, simply compile using FORTRAN 
II appropriate for machine. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060145 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.146 

CROSS AND SIMPLE TABULATION PROGRAM C., A^ S^ T;. 

AUTHOR: Howard Givner 

DIRECT TECHNICAL INQUIRIES TO: 
Howard Givner 

Office of Testing 8 Research 
Brooklyn College 
Bedford Avenue 5 Avenue H 
Brooklyn, Hew York 11210 

DESCRIPTION - This program is designed to tabulate punch- 
card coded responses that are numerical (0-9), or consist 
of a single zone punch by itself (+ or -) , or are blank, 
for up to 200 items. Responses for a individual can be 
on more than one card if necessary. The number of response 
values and individuals to be counted is limited by core 
size and the number of tabulations to be done in one pass. 
Fcrmat cards entered prior to the data provide for flexible 
data preparation. One control item may be cross tabulated 
with all other items with one pass of the data. No Direct 
Divide, Indirect Addressing, or special instructions are 
required. Coding is in SPS. FORTRAN with format 
input/output routines are used, with slight modifications. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE 5EADABLE - None. 



1620-0 6.0.1 44 

DICHOTOMIZE DATA 

AUTHORS: Lowry L. HcKee George Goldberg 
DIRECT TECHNICAL INQUIRIES TO: 

Mr. Lowr; L. KcKee, Asst. Dir. 
Computer Center 
Hofstra University 
Hempstead, New York 

description - Program will dichotomize one or two digit 
fields in a punched card. No similar routines exist to 
our knowledge. Restrictions - data must be positive and 
numeric. If data cards are numbered, only card columns 
1-77 can be used. The identification number, if used, 
must be in card columns 78-80. Storage reguirements - 
00402 - 02590. Eguipment - Card, 20K memory. Indirect 
Addressing, no other special features reguired. Language 
- SPS, Fixed Point. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060144 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 2 Z 06 . 0jtl45 

CORRELATION MATRIX WITH OPTIONAL FACTOR ANALYSIS AND 
ROTATION OF FACTORS 

AUTHOR: p. K. Olson, Jr. 

DIRECT TECHNICAL INQUIRIES TO: 
P. K. Olson, Jr. 
NEOTC Unit 



ORDERING INFORMATION: PROGBAH NUMBER 1620060146 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620-06.0.147 

AUTO CORRELATION-POWER SPECTRUM 



AUTHORS: William Lawton 



Franklin Puff 



DIRECT TECHNICAL INQUIRIES TO: 

Franklin Puff 
Eastman Kodak Company 
Building 56, Kodak Park 
ftochester. New York 

To compute from time series data the Autocovariance PHI (K) , 
the Autocorrelation RHO(K), and the spectral density BETA 
(W SUB j) . Method- Bartlett Lag Window. 

Restrictions (range-XT) read in egual to or less than 1500 
observations, PHI(K) computed egual to or less than 150, 
RHO(K) computed egual to or less than 150, BETA (W SUB J) 
computed equal to or less than 1500. Storage used by 
program- Internal core storage 40K. Hachine equipment 
reguired by program- Card system. Auto Divide, Indirect 
Addressing object deck was compiled using Floating Point 
hardware. Programming Type- FORTRAN II Mainline, complete. 
Other programming language machine, used for patching for 
end-of-data and variable input. The machine language patch 
is not necessary if an end-of-data routine is used in the 
source deck and if format number 84 is changed to agree 
with the data. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060147 



CONTRIBUTED PBOGHAHS 



PAGE 060 1620 

CONTINUED FROM PBIOB PAGE 



Indicate "B H 1" in columns 1-3 and the Prograa Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.148 

SINGLE AND MUTIPLE LIHEAB REGRESSION ANALYS IS PROGRAM 



ADTHOB: 



Anthony J. Capato 



DIRECT TECHNICAL INQUIRIES TO: 
Anthony J. Capato 
Chemical Engineering Department 
Columbia University 
New York 27, New York 

DESCRIPTION - This prograa uses a least sguares procedure 
to calculate the estimates of the Partial Regression 
Coefficients B SUB 0, B SUB 1, B SUB 2,..., B SUB K in 
the Multiple Linear Model Y equals B SOB 0, plus B SOB 
1, X SUB 1, plus; B SUB 2, X SDB 2 plus .... Plus B SUB 
K, X SUB K. The maximum number of independent variables, 
X SUB K, is ten- that is, K is egual to or greater than 
1 and egual to or less than 10. When K eguals 1, the 
program estimates B SUB and B SUB 1 in the single linear 
Model Y eguals B SUB plus B SUB 1, X SUB 1. The prograa 
also computes the simple correlation coefficients, the 
multiple correlation coefficient, the standard error of 
the Y data, the standard error of the estimate, the 
significance of the regression (g) , and the standard error 
of the partial regression coefficients. The output is 
via the console typewriter and is complete with table 
headings and labels. Mathematical method- standard 
statistical formulas as given in the write-up. 
Restrictions/range- the maximum number of independent 
variables is ten but the number of data points allowed 
is unrestricted. The original input data are destroyed 
during the computations. 

PROGRAMMING SYSTEMS - Britten in FORTRAN with Format. 



MINIMUM SYSTEM REQUIREMENTS 
20,000 digits. 



Storage requirements- about 



BASIC PBOGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM MUHBEB 1620060148 

Indicate "B N 1" in columns 1-3 and the Prograa Number 
in columns 4-13 on the IBM Program Order Form. 



J620 = 0€ J J J50 

BJJD r MUENCB 50 PERCENT END^POINT DETERMINATION 



AUTHOR: 



William F. Brown 



DIRECT TECHNICAL INQUIRIES TO: 
John R. Hatfield 

Technical Information Processing and Control Recor 
Lilly Research Laboratory 
Indianapolis, Indiana 462 06 

DESCRIPTION - To calculate the estimated BD-50, 1n ED-50, 
variance (In ED-50) , and the 2 and 3 Sigma upper and lower 
control limits with up to H number of doses and a fixed 
number of N animals at each dose. Restriction/range- 
Number of dose levels cannot exceed 10. The number of 
animals is unlimited but must be the same at all dose 
levels. Auto Divide. Source programs are included for 
those machines of other configurations- Language- FORTRAN 
with Format. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUHBEB 1620060150 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IEH Program Order Form. 



1620-06.0.152 

MEETING ASSUMPTIONS OF HOMOGENEITY OF VARIANCE, 
NONLINEAR EATA TRANSFORMATIONS 



CONTINUED FROM PBIOB COLUMN 

for which the variances are shown to be homogeneous. 
Storage used by program- Full 20K. Equipment required 
by program- Card system. Programming Type- FORTRAN with 
Format, program compiled using a modified version of the 
U.T.O. FORTRAN Processor. It may be compiled on any size 
machine with any FORTRAN with format processor. , Output 
must be sorted before listing on a 407 or the 1620 
typewriter. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE -' None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060152 

Indicate "8 N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.154 

HOxINzONE L££ST SQUARES PR OGRAM 

AUTHOR: Ronald C. Read 

DIBECT TECHNICAL INQUIRIES TO: 
Bonald C. Read 
Department of Mathematics 
University of the Best Indies 
Kingston 7, Jamaica 

DESCRIPTIOH - This program effects the solution, on the 
basic tape 1620, of two common types of least squares 
problems, as follows: Problem A. Given H linear equations 
in N unknowns (B greater than N) to find the solution of 
them which minimizes the sum (possibly weighted) of the 
squares of the unknowns. Problem B. Given N linear 
equations in H unknowns, (N greater than B) to find the 
values of the unknowns which minimize the sum (possibly 
weighted) of the squares of the left-hand sides of the 
equations. These problems are common occurence in surveying 
practice, and in many other fields. Storage used by 
program- for the program- up to location 6219. Data storage 
- the rest of memory (20K) . Equipment required by program 
basic tape 1620. Program Type- S.P.S. Language used in 
the writeup - S.P.S. The prograa handles problems for 
which the value of M is less than or equal to 50. The 
value of M is virtually unrestricted. 

BASIC PBOGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060154 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06,0,155 

CALCULATION OF CLEBSCH-GOBDAN COEFFICIENTS 

AUTHOR: J.H. Hughes 

DIRECT TECHNICAL INQUIRIES TO: 
H.B. Kerr 
computer Center 
Tenn. Tech. 
Cookeville, Tenn. 

DESCRIPTION - This is a program which will calculate 
Clebsch-Gordon coefficients. 

PROGRAMMING SYSTEMS - Written in FORTRAN with Format. 

MINIMUM SYSTEM REQUIREMENTS - 8K storage, and a card system. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060155 

Indicate "B N 1" in columns 1-3 and the Program Number in 
columns 4-13 on the IBM Program Order Form. 



1620-06.0 -157 

FOUR TYPE POLYSOMIA! CURVE FITTING BY LEAST S QUAR ES 



AUTHOR: 



Richard C. Irons 



DIRECT TECHNICAL INQUIRIES TO: 
Richard C. Irons 
Euilding 16 

U. S. Naval School of Aviation Medicine 
Pensacola, Florida 

DESCRIPTION - Two programs have teen developed to accomplish 
the data transformations and the Bartletts Test for 
Homogeneity of Variances. THe first program generates 
a table of the original data and four sets of transformed 
data. The summation X and summation X sguared for the 
original and the transformed scores are punched on cards 
to be used as input for the seccnd program. The second 
program utilizes the output of the first and performs 
Bartletts Test for Homogeneity of Variances on the original 
and transformed data sets. The investigator can then 
select for further statistical analysis the set of data 



AUTHOR: A.C. Housman 

DIRECT TECHNICAL INQUIRIES TO: 
A.C. Housman 
Royal McBee Corp. 
Research S Development Division 
Nest Hartford, Connecticut 

DESCRIPTION - This program fits any of four different types 
of polynomials to a given set of data by the method of Least 
Squares. The program also calculates a statistical 
measurement of the standard error and standard deviation for 
each polynomial fitted and allows various print out options 
as well as weighting of the data points. 



PROGRAMMING SYSTEMS - Written in 1620 PDQ FORTRAN, 
should compile on a 40K system without change. 



also 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 



CONTINUED FROM PRIOR COLUMN 



MINIMUM SYSTEM REQUIREMENTS - A card system, also TNS, TNF, 
HF, Auto Divide, Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060157 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



percentages of sediment concentration, as recorded at a 
given stream-gaging station for a maximum period of one 
year, and computes the daily sediment- loads in tons and 
acre-feet. Daily data is printed one month to the page, 
followed by an annual-summary sheet. Maximum and minimum 
values are isolated from the year's converage, along with 
their dates of occurrence. Program contains a provision 
for accepting partial-day values of flow and concentration 
when required, storage used by program - 19,959. Equipment 
required by program - Paper Tape system. Programming type 

UTO FORTRAN. 



1620-06.0^158 

lIllC STATISTICS^FUNpAHENTAL ANALYSIS OF FINITE SERIES OR 
SAMPLE DATA 



AUTHOR: B. J. Highland 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 
ORDERING INFORMATION: PROGRAM NUMBER 1620060160 

Indicate "B N 1" in columns 1-3 and the Program N 
in columns 1-13 en the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
B. J. Highland 

Director of Computer Laboratory 
Long Island University 
Brooklyn 1 , New York 



1420-06.0^161 

&J!£LXSXS OF VARIANCE SPLI T-SPLIT- PLOT DESIGN 



AUTHORS: Earl Foster Donald Peterson 



DESCRIPTION - Basic statistical analysis of data in 
Scientific, Educational, Psychological, Industrial 
Engineering, Testing and Business Research. Program 
provides 25 disparate measures of central tendency, 
dispersion, normality as veil as fundamental summations 
for a series of data. Fifurcated analysis permits use 
of different formulas for treatment of finite series as 
compared with sample data. Standard statistical formulas 
are used throughout for analysis of raw data. Up to 999,999 
individual 10-digit (2 decimal place) values may be 
processed by the program. Storage used by program- program 
storage from 18439 to 20000. Programming type- FORTRAN 
with Format, Mainline, complete. Although the program 
is written to accept raw data in an F10.2 Format, most 
significant output data are in F 12.4 Format and summations 
(X,x squared, X cubed, and X to the 4th power) are in E- 
Fornat. If greater number of decimal values are reguired 
for raw data input or in output, program will operate with 
change of format statements only. 

PROGRAMMING SYSTEMS - Hritten in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - Equipment required by program- 
requires a 407 or other card listing unit. Can be used 
with minimum 1620 with 1622 card system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Srite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060158 



DIRECT TECHNICAL INQUIRIES TO: 

Earl Foster 

North Dakota State University 

Agronomy Deft. 

Fargo, North Dakota 

DESCRIPTION - Performs and punches a complete analysis 
of variance, and punches means for the three main effects, 
the three two-factor interactions, and the replications 
of a split-split-plot design. The analysis of variance 
is completely labeled and is listed in tabular form. The 
mean values are listed in single horizontal arrays for 
the two-factor interactions. Output is designed especially 
for easy study of the results even though storage space 
was sacrificed. The program will handle from two through 
nine levels of whole plots, two through six levels of sub- 
plots and sub-sub-plots, and two through four replications. 
Storage used by program - 40K. Equipment reguired by 
program - Card system, TNS, TNF, MF, Auto Divide, Indirect 
Addressing. Programming Type - FORTRAN II, Mainline, 
complete. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060161 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.162 

CORREIATION MATRIX PROGRAM 



AUTHOR: 



1620 z 06. 1-159 

TESTING REGRESSION 



AUTHOR: S. A. Raymond 



Hyman Burshtyn 



DIRECT TECHNICAL INQUIRIES TC: 
S. A. Raymond 

Ohio Agricultural Experiment Station 
Booster, Ohio 

DESCRIPTION - The program tests whether or not three or 
more linear regression equations can be pooled into one. 
Input can consist of paried X, Y values for up to 50 groups 
or corrected sums of squares and cross products of X and 
Y for each group. Output consists of linear regression 
coefficients and appropriate F statistics to test four 
hypothesis according to Ostle, Bernard 1954. Statistics 
in research, Iowa State College Press, Ames, Iowa, 487 
pages, section 6. III. Storage used by program - 19,000. 
Eguipment reguired by program - card system. Programming 
Language - AFIT-FORTRAN. Language used in the writeup 
- AFIT FORTRAN. Compiled on a 40K with Automatic Divide 
and Indirect Addressing. 

BASIC PRCGEAK PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060159 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620:106^160 

SUSPENDED SEDIMENT-LOAD COMPUTATION FOR RIVERS AND STREAMS 



DIRECT TECHNICAL INQUIRIES TO: 

Hyman Burshtyn 
Dept. cf Sociology 
Carleton University 
Ottawa, Ontario, Canada 

DESCRIPTION - This program is designed to compute a 
correlation matrix of variable size, maximum 80X80, from 
raw scores. It also produces, at user's option, means, 
standard deviations, standard errors squared, sums of 
scores, of squares, and of crossproducts. Has special 
"Interrupt" Feature permitting easy interruption during 
data input phase and resumption at later date. Designed 
for behavioral science data where scores are often just 
one digit in length but numbers of observations often 
large. Output is in form immediately acceptable to author 1 s 
centroid factor analysis program, and author's special 
transposition program producing a highly readable 
correlation matrix. Standard statistical techniques. 
Suimations are carried out in fixed point. As written, 
can handle up to 80 variables, number of observations 
limited only by necessity to keep maximum sums of squares 
smaller than 100,000. Input format requires single digit 
integer scores. Writeup suggests alterations to increase 
size of matrix, and/or sums of squares word size limit 
and/or size of data words (all may not be realized at 
once) . Equipment specifications - Compiled on a 1620 Model 
I with card input-output, 40K, and all optional features 
except Floating Point hardware. Program Language - FORTRAN 
II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060162 



AUTHOR: J. H. Lafon 

DIRECT TECHNICAL INQUIRIES TC: 
J. W. Lafon 

U. S. Army Engineer District 
Albuquergue, New Mexico 

DESCRIPTION - Accepts as data the daily flows and 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 
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J 6 202 06^0^16 4 *M 

IMIBSE LAPLACE TRANSFORM 

AUTHOB: Eng. Conp. Lab. 

DIEECT TECHNICAL INQUIRIES TO: 
D. W. Peterson 
Eng. Coup. Lab. 
University of Wisconsin 
Hadison 6, Wisconsin 

DESCEIPTION - ILT is designed to find the time domain 
function corresponding to an S-plane or complex frequency. 
The output is an expression containing impulses, 
exponentials, and sinusoids. There are three decks to 
ILT - ILT-A, ILT-B, and ILT-C. ILT-A finds the zeros of 
the denominator and multiplies out the numerator and 
denominator . factors. Using the output of ILT-A as data, 
ILT-B computes appropriate values for real and imaginary 
frequencies, and coefficients of individual exponential 
and/or impluse time responses. Using this information, 
ILT-C chooses appropriate formats and supplies a FORTRAN 
Language representation of the prescribed time domain 
function. The basic procedure is to fcreak the given 
expression into partial fraction form, using Cauchy Residue 
Theorem to obtain numerators. Denominator zeroes are found 
by a modified Bairstow-Horner method. Storage requirements 

- Deck ILT-A - 25130* digits when compiled by FORGO or 
FCR-TO-GO, 32408* digits when compiled by 1620 FORTRAN. 
Deck ILT-E - 26900 digits when compiled by FOEGO or FOR- 
TC-GO, 32284* digits when compiled by 1620 FORTRAN. Deck 
ILT-C - 17280* digits when compiled by FORGO or FCR-TO- 
GO, 21196* digits when compiled by 1620 FORTRAN. *Excluding 
34860 digits used for FORGO, or 18280 digits used for FOR- 
TO-GO. **lncluding 9-30-61 1620 FORTRAN and subroutines 
storage space. 

PROGRAMING SYSTEMS - Britten in FORTRAN. 

MINIMUM SYSTEM REQUIBEHENTS - Equipment specifications 

- Deck ILT-A - 60K (using either FORGO or FOR-TO-GO) , 40K 
(using 1620 FOBTBAN) . Deck ILT-B - 60K (using FOB-TO-GO) , 
40K (using 1620 FORTEAN) . Deck ILT-C - 60K (using FORGO), 
40K (using FOR-TO-GO, 1620 FORTRAN). For all three - 
Indirect Addressing, Automatic Divide. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060164 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-86.0.165 

SCORING^ STANDARDIZED SCOBES, ABE EATINGS FOR THE 

SIBDCTCREE^ OBJECTIVE HOBSCHACfl TEST/SCRT 



Automatic Divide, Indirect Addressing, and one 1311 Disk 
Drive is required. Uses FORTRAN II-D with Monitor I System. 
For full operation of this program, the user's system 
should contain FORTRAN call subroutines for plotting. 
Program No. 01.6.123. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060166 

Indicate "B N 1 w in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^06^167 

MULTIVARIATE DATA COLLECTION 



AUTHOR: 



Rex L. Hurst 



AUTHORS: Bex L. Hurst Philip Langer 

DIRECT TECHNICAL INQUIBIES TO: 
Bex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - These programs have been developed to accept 
the student answer sheet, in punched card form, for the 
sort and produce the following (1) The raw scores, (2) 
The standardized "T" scores, and (3) The ratings. Storage 
requirements - 40K or larger. Language - FOETEAN II. 
With a 40K machine two passes are required. With a 60K 
machine cr a machine larger than the 1620, a combination 
program may be used. On a Model One 1620, forty seconds 
are reguired per test. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060165 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTOCORRELATION-SPECIAL ANALYSIS 



DIRECT TECHNICAL INQUIRIES TO: 
Rex I. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - This program is intended to be a basic data 
collection program for a wide variety of multivariate 
problems. It will compute means, standard deviations, 
sums of squares and products, and correlations. It will 
perform both within group and among group calculations. 
The following programs which we now have available, use 
the output of this program for their input. Multiple 
Regression (I, II, III) 06.0.169, Factor Analysis - 
Principal Components (I, II) 06.0.169, canonical Correlation 
(I, II) 06.0.137. Other programs in this series will 
become available as they are written. A 40K Card 1620 
with TNS, TNF, HF, Auto Divide and Indirect Addressing 
is required. Requirements which can be easily removed 
are TNS, TNF, HF, Auto Divide and Indirect Addressing. 
FORCOH subroutines requires (01.6.051 or 01.6.096). The 
program provides for up to nine transformations and three 
card forms. Additional transformations may be added by 
the user. It will handle up to thirty-nine transformed 
variables. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060167 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



MULTIPLE REGRESSION _£Xi II AND III) 



AUTHOR: 



Rex L. Hurst 



DIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - This series of three interlocking programs 
is part of a Multivariate Analysis Package. Multiple 
Regression I computes a multiple reqression equation from 
any possible subset of terms used in Multivariate Data 
Collection. Multiple Regression II uses the output of 
Multiple Regression I and allows the user to test composite 
hypotheses. Multiple Regression III uses the input to 
multivariate data collection and the output from Multiple 
Regression I It will evaluate the multiple regression 
equation for each observation. A 40K Card 1620 is required 
by program. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATICS: PROGRAM NUMBER 1620060168 

Indicate "B N 1" in columns 1-3 and the Proqrara Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOR: 



J. E. Turney, Jr. 



DIRECT TECHNICAL INQUIRIES TO: 
J. E. Turney, Jr. 
Mgt. Research Dept. 
II- P. Hood S Sons, Inc. 
Charles town, Massachusetts 

DESCRIPTION - To compute from time series data the 
Autocovariance PHI (K) , the Autocorrelation RHO (K) , and 
the normalized spectral density FT (WSUBJ) . The operating 
speed and computational method offer particular advantage 
over previous, similar programs. 

PROGRAMMING SYSTFMS - Written in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - 1620 card system with 20K 



1620-06.0.169 

FACTOR ANALYSIS-PRINCIPAL COMPONENTS 



AUTHOR: 



Rex L. Hurst 



DIRECT TECHNICAL INQUIRIES TO: 
Rex L. Hurst 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - This series of two interlocking programs 
is part of a multivariate analysis package. Factor Analysis 
I will compute a principal components analysis from any 
possible subset of terms used in multivariate data 
collection. Factor Analysis II will perform a varimax 
matrix rotation. It is modified from 06.0.094 by 



CONTRIBUTED PROGRAMS 
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permission. A 40K 1620 card is required by program. See 
also Multivariate Data Collection, Multiple Regression 
(I, II, III) Canonical Correlation I and II. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only, 
MACHINE READABLE - Hone. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060169 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns $-13 on the IBH Program Order Form. 



1620-06.0.170 

ANALYSIS OF DATA 



1620^06^0.175 

MAXIMUM COEKELATION HITH MISSING OBSERVATIONS 



ADTHOE: 



Justus Seely 



AUTHOR: 



Edward v. Harris 



DIRECT TECHNICAL INQUIRIES TO: 
Edward V. Harris 
East Texas State College 
Commerce, Texas 

DESCRIPTION - Op to 10 columns of data can be analyzed. 
Any number of data points may be used. Options are the 
mean and standard deviation of each column-slope, intercept, 
and standard error of the estimate for the straight line 
curve fit between any two columns-simple correlation 
coefficients-first order partical correlation coefficients 
analysis of variance with the F test for one criterion 
of classification - and analysis of variance with F tests 
for two criteria of classification, one entry in each box. 
A 20K card 1620 is required by program. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Srite-up on Microfiche only. 

MACHINE EEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060170 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



162 0^06^1.1 71 

fBEGJJENCT DISTBIBJJTION PROGRAM - SINGLE AND DOUBLE COLUMN 

AUTHOR: Joseph C. Mayhew 

DIRECT TECHNICAL INQUIRIES TO: 
Donald L. Bright 
Georgetown University 
37th and "0" Streets, N.H. 
Washington, D.C. 20007 

DESCRIPTION - This program is designed to compute the 
absolute frequency and percentage of response for each 
of 10 digits (0-9) in a column, or each of 100 two-digit 
combinations (00-99) in a field of two adjoining columns. 
The prograa will handle 80 single column fields or 40 
double columns as well as any combination of single and 
two-digit fields occupying an 80-column card at maximum; 
and up to 9999 cases. A 1620 card system with TNF, ME, 
Auto Divide 6 Indirect Addressing is required by the 
program. TNF S Auto Divide can te removed by using 
subroutines and recompiling. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE EEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060171 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 

Justus Seely 
Utah State University 
Computer Center 
Logan, Utah 

DESCRIPTION - This program was written to obtain the maximum 
number of observations available between variables I and 
J when missinq observations are assumed to be present in 
the data, and then to compute the correlations using the 
maximum number of data points available between variables 
I and J. With one pass of the data, up to 24 variables 
can be considered simultaneously. A 40K card system with 
TNS, TNF, MF, Auto Divide S Indirect Addressing is required 
by the program. Britten in FORTRAN II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060175 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



16 20 z 06. 0.177 

MEAN AND STANDARD DEVIATION^ SUM 3F SQUARES^ N 

AUTHOR: Kenneth Paston 

DIRECT TECHNICAL INQUIRIES TO: 
Kenneth Paston 
Erooklyn College 
Office of Testing and Research 
Bedford and Avenue H 
Brooklyn 10, New York 

DESCRIPTION - To compute means and standard deviations 
of up to 80 one- to four-digit variables by columns. Input 
and output formats are specified by header cards. This 
is a card input-cutput machine language program that 
calculates in Fixed Point, uses Indirect Addressing and 
requires 20K (switch 2 off) or 40K (for all options). 
More than 40 variables (for 40 means and standard 
deviations) can be processed at 250 cards/minute on a 1620 
Model 1. Switch controlled options are provided for 
punching sum, sum of squares and n for each variables 
(switch 3). For batch processing by control numbers (switch 
1) and for calculating the means and standard deviations, 
sum, sum of squares and N for all the groups as a whole 
(switch 2) while batch processing. Programmed in machine 
language. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060177 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



!620 = 06_.0.!78 

COMPUTATION OF THE CANONICAL CORRE LATION COEFFICIENT AND 

REGRESSION HEIGHTS 



AUTHORS: E. R. Eisgruber 
L. M. Eisgruber 



R. J. Rades 



1620=06^0^172 

KJKDALL1S TAU AND SPJARMANj 



S RHO CORRELATION COEFFICIENT 



AUTHOR: 



E. C. Segraves, Jr. 



DIRECT TECBNICAL INQUIRIES TC: 
E. C. Segraves, Jr. 
University of Oklahoma 
Medical Research Computer Center 
800 N.E. 13th Street 
Oklahoma City, Oklahoma 73104 

DESCRIPTION - This procedure ranks, adjusts for ties within 
ranks and computes the Kendall TAU or the Spearman RHO 
correlation coefficient. Kendall's statistical procedure 
is used. This program will handle up to 10 variables and 
100 observations. The data is stored prior to the ranking 
and computation of the analysis. The present form compiled 
with FORTRAN II-D will use 32,848 positions of core. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: FEOGBAM NUMBEE 1620060172 

Indicate W E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
R. Rades 

Purdue University 
Dept. of Agricultural Economics 
Lafayette, Indiana 

DESCRIPTION - The program will compute standard deviations, 
means, and the correlation matrix for all variables in 
two sets of variables. It will also compute the canonical 
correlation coefficient and the regression weights for 
the variables. Aitken , s method for finding the largest 
eigenvalue is employed. Up to 20 variables with up to 
999 observations each can be processed. Storage used by 
program is 53,838. Eguipment required by proqram is card 
system with TNF, MF, Auto Divide, Indirect Addressing and 
Floating Point hardware. Programmed in FORTBAN II. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060178 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^0^.0.129 

SCORIT-SCOBING AND ITEM ANALYSIS OF PORTA-PUHCH TEST CARDS 

AUTHORS: p. A. Games V. Rousch 



CONTRIBUTED PHOGBAHS 
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DIBECT TECHNICAL INQUIRIES TO: 
P. A. Games 
Computer Lab. 
Ohio University 
Athens, Ohio 

DESCBIPTIOH - Score student punched test cards, provides 
score for each seat number, plus descriptive statistics 
of the distribution of scores. Divides scores into upper 
and lover halves, and reports the frequency of responses 
to each alternative of each iten, plus PHI coefficient 
and percent passing, if desired. Kuder-Bichardson Formula 
20 Reliability Estimate completes output. Maximum of 692 
score cards with max. of 70 items each. Modifications 
suggested if more cards are required, at a loss of some 
optional output. 

PROGRAMMING SYSTEMS - Language usea is - FORTRAN II-D, 
Requires Monitor Control. 

minimum system requirements - 40K memory, with disk pack. 
Automatic Divide, and Indirect Addressing. Card input 
and output. 

EASIC PBCGBAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE BEADABLB - Appropriate material delivered. 

OPTICNAL EEOGBAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060179 



16 20-06. 0.182 

1HE EXAC.T MEAN AND VARIANCE OF CHI SO, 
EXPECTATIONS ARE SHALL 



AUTHOR: 



M. J. Baloney 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



CARDS 
none 



USES VOLUME 
REQUIREMENT 



none 
none 



1620^06^0^80 

i ilOGBAM FOB PAIR COMPARISONS 

AUTHORS: C. S. Givens, Jr. ft. B. Blount 

DIRECT TECHNICAL INQUIRIES TO: 
C. S. Givens, Jr. 
Northern Illinois University 
Dekalb, 111. 

DESCRIPTION - This program will take pair comparison data, 
either test item choices or the proportion matrix and scale 
it according to the assumptions of Case V as described 
by GUILFORD, 1954. (Guilford, J. P. Psychometric Methods, 
New York - McGraw-Hill, 1954.) It handles from 3 to 10 
test items or variables, scaling them and computing a chi- 
sguare on the generated scale values. All output is 
adequately labeled. Card system with 40K and 407 80-80 
hoard. Programmed in FCBTBAN II. 

BASIC EBOGRAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUHBEB 1620060180 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



IlfiST SQUARE DIFFERENCES^ NON LIHEAB CURVE FIT 



DIBECT TECHNICAL INQUIRIES TO: 
D. (fright 

Computation Center 
Georgetown University 
Washington, D. c. 20007 

DESCRIPTION - The data to be analyzed are arranged in an 
R by C matrix where B and C must be less than or equal 
to 40. The program computes CHI square, the standard 
deviation and the E and T statistics. The procedure has 
a particular advantage in that it does not assume that 
the number of samples is large. Storage used by program 
- 22,540 core positions, with 8 digit accuracy. Equipment 
required by program - Card... Floating Point hardware... 
1620 Model I. The storage needed can be made less than 
20,000 and need for Floating Point hardware removed. 
Programmed in FORTRAN II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620060182 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^06^.0^^83 

TIPS - TENNESSEE INTERP RETIVE P.ROGRAM FOR STATISTICS 

AUTHORS: Mrs. A. McEachran Dr. C. W. Sheppard 

DIRECT TECHNICAL INQUIRIES TO: 
Mrs. A. McEachran 
University of Tennessee 
Medical Units Computer Center 
26 S. Dunlap 
Memphis, Tenn. 

DESCBIPTION - TIPS was written for statistical analysis 
which were too small for the existing larger programs and 
too large to be done quickly at the desk calculator. With 
this system, the 1620 is converted into a special-purpose 
statistical computer which uses an interpretive programming 
language and system of address codes. An interpretive 
programming language and by external programming, TIPS 
can obtain a variety of statistical information (e.g. 
means, sums of squares of deviations from the mean, 
coefficients of correlation, and third and fourth moments) 
as well as perform linear and non-linear regressions, a 
T test on two means, and one-way and two-way analysis of 
variance. The program handles groups of data as vectors 
and has free-form Floating point input/output. 

A 20K 1620 card system with Autodivide is required by the 
program. The reguirements for Autodivide can be easily 
removed. Written in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGBAM NUMBER 1620060183 

Indicate "B N 1" in columns 1-3 and the Progran Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOE: 



B. A. Ward 



DIRECT TECHNICAL INQUIRIES TO: 

D. L. Wright 
Computation Center 
Georgetown University 
Washington, D. C. 20007 

DESCRIPTION - This program provides a method of fitting 
a non-linear eguation to data based on a function supplied 
by the user in the form of a FORTRAN function subprogram. 
The method is to consider all possible combinations of 
parametric values and, for each combination, to compare 
all observations with computed values and use the method 
of "least squares" to obtain the best combination of 
parameters - the best fit of the equation to the data. 
Any function may be used of up to 7 variables, 6 parameters, 
and 400 observations provided a 60K memory is available 
and a disk system. If these are not available, the number 
of observations permitted will be restricted. In no case, 
however, is it possible to use this program if only a 20K 
memory is available. 

Equipment required by program - Card 1620 with a disk file 
having one drive and Floating Point hardware. Programmed 
in FORTRAN II-D. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 
ORDERING INFORMATION: PROGBAM NUMBEB 1620060181 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 2 0^0 6^ 0. 18 5 

ITEM ANALYSIS PBOGBAH 

AUTHOR: L. L. Havlicek 

DIRECT TECHNICAL INQUIRIES TO: 
L. L. Havlicek 
Wichita State University 
Wichita, Kansas 67208 

DESCBIPTIOH - This program is designed to do an item 
analysis of any 5-choice multiple-choice test, or to analyze 
responses to any 5-choice questionnaire. The program 
computes the discrimination index and the difficulty index 
for each response for each item as well as yielding the 
number of individuals marking each response if this is 
desired. For questionnaire analysis, the program computes 
the percentage responding to each response and/or the 
frequency responding to each response for each item. The 
program can handle up to 999 items and an S of 999. The 
method for the item analysis is an approximation method. 
Basic 1620, 20K, card system. Programmed in - SPS III. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620060185 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.186 

Z SCOBE PRCGBAM 



AUTHOR: I. 1. Bavlicek 



CONTRIBUTED PROGRAMS 

1620 

CONTINUED FBOM PBIOB COLUMN 

in columns 4-13 on the IBH Program Order Form. 



DIRECT TECHNICAL INQUIBIES TO: 
I. I. Havlicek 
Wichita State University 
Wichita, Kansas 67208 



DESCRIPTION - The purpose of this program is to convert 
ran scores to standard Z-scores, to compute a composite 
Z-score for each individual, and to compute the means and 
the standard deviation of the composite 2-scores. Program 
handles up to 8 tests, 4 of which can be weighed doubly 
for each conposite Z-score. The program is not restricted 
as to the number of cases. 

Basic 1620, Model 1, 20K, card system, and Auto Divide 
and TNF special features. Programmed in - SPS III. The 
progran handles raw scores from 001 to 999, however, the 
neans and standard deviations cannot exceed 99.99. For 
tests with means above 99.99, a constant can be subtracted 
from each score and the mean so that this program can be 
used in this situation. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABIE - None. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620060186 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620^06^^87 

M SPS VABIill DIFFERENCE PROGRAM 

AUTHOR: J. Matlock 

DIRECT TECHNICAL INQUIRIES TO: 
J. Matlock 
Eox 1795 
San Francisco, Calif. 94101 

DESCRIPTION - The variate difference method provides a 
means of determining a lower limit to the degree of 
polynomial which mill fit a sequence of uniformly spaced 
data points and give an estimate of the variance of the 
data. least sguares or other techniques can then be used 
to determine the coefficients of a polynomial of this 
order. This program will accept 1633 data points and 
calculate the variate difference for nine orders. 3589 
positions of core needed. 

Equipment - Card, Auto Divide, Indirect Addressing, 1620 
Model I. As written the program cannot be run on a lesser 
machine. By decreasing the number of data points it may 
be recompiled to run without Auto Divide. Programmed in 
- SPS; Assembled using Ver II Hod 17. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620060187 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Progran Order Form. 



1620^06^0^88 

BIHABIATB LINEAR CORRELATION 

author: A. Wolpin 

DIRECT TECHNICAL INQUIRIES TO: 
A. Wolpin 
Data Corporation 
7500 Xenia Pike 
Dayton, Ohio 45432 

DESCRIPTION - A line of best fit (line of regression) in 
the form I equals ASBX is fit to the data by least-squares 
techniques. Data is supplied in free-form and read to 
a format supplied at object time. Therefore, it is directly 
usable in almost any situation. The program will accept 
up to 1000 pieces each of X and Y data. In addition to 
computing the line of regression, the program will also 
compute the standard error of estimate (similar to standard 
deviation) and the coefficient of correlation. Storage 
used by program - 35,709 positions. 

Equipment reguired by program - a 1620 card system with 
INS, TNF, MF, Auto Divide, Indirect Addressing, 1620 Model 
I, Model II, 1443 Printer, and additional 20K memory. 
Hith simple program changes, any I/O can be used. 
Programmed in - Kingston FOBTBAN II. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBIHG INFORMATION: PBOGBAM NUMBER 1620060188 

Indicate "B N 1 n in columns 1-3 and the Program Number 



1620-06.0.193 

CALCULAT ION OF MULTIPLE COBBELATION COEFFICIENT 



AUTHOE: 



D. Eschback, Jr. 



DIRECT TECHNICAL INQUIRIES TO: 
D. Eschback, Jr. 
University of Toledo 
Toledo, Ohio 

DESCRIPTION - This program accepts the simple correlation 
matrix of a set of variables and calculates the multiple 
correlation coefficient. By typewritten entry subsets 
of the original matrix can be designated to be used to 
calculate their multiple correlation coefficients also. 

Storage used - 19842. Eguipment required by program - 
1620 Card system with 1 disk file. Written in FORTRAN 
II-D. The program can easily be expanded to take advantage 
of more core. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 

MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060193 

Indicate W B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-0 6.0.194 

TEST FOR NORMALITY WITH PROVISION FOR STANDARDIZATION OF 
VARIABLES 



AUTHORS: H. Maisel 



L. Wright 



DIRECT TECHNICAL INQUIRIES TO: 
D. L. Wright 
Georgetown University 
Computation Center 
Science BLDG. - Bm.234 
Washington, D.C. 

DESCRIPTION - This program is designed to compute a single 
measure of shewness and kurtosis for many separate groups 
of data combined. It is especially useful for testing 
for normality prior to performing an analysis of variance. 
It produces the mean and an unbiased estimate of the 
standard deviation of each group as a by-product of the 
computation. Also, a the option of the user, it lists 
the observations for all groups combined in descending . 
order after transforming them to standard form, such as 
after subtracting the group mean from each observation 
and dividing the result by the group standard deviation. 
This list can then be used to perform a CHI-sguare test 
for goodness of fit. The only limitation is that the 
number of observations in all groups combined cannot exceed 
4000 for any one job. Storage used by program - 58084 
positions, card I/O. Program can be used with 20 or 40K 
core. Programmed in - FORTRAN II-D. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060194 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620 z 06_.0 i 202 ±M 

1 TO 4 WAY ANALYSIS OF VARIA NCE WITH REPEATED MEASURES AND 
INEpJI AL SUBSET CELL FREQUENCY 

AUTHOR: Raymond Kurzwell 

DIBECT TECHNICAL INQUIBIES TO: 
Baymond Kurzwell 
221-28 Hartland Avenue 
Jamaica, New York 11427 

DESCRIPTION - The program is able to do one, two, three 
and four way analysis of variance with or without repeated 
measures. Unequal subset cell frequencies are allowed. 
It can handle up tc four variable with up to four levels 
for each independent variable and up to twenty repeated 
measures. The program can handle a wide variety of 
analysis, allowing four choices of number of variables 
and numerous choices for number of levels and repeated 
measures. There is no restriction on keeping subset cell 
freguencies equal. The program punches out sums, sun 
squares and means of each subset cell, error terms, mean 
tables, intermediate formulas and the summary table of 
sums of sguares, mean squares, degrees of freedom and F 
ratios. The program uses a 40,000 address common storage. 
The largest link program uses about 7,300 addresses. A 
60,000 address core storage is required. 

It is possible to use the program without a disk-drive 
by compiling the program and storing the machine language 
instructions on cards. Every time another link program 
is required, they can be loaded from the object decks. 



CONTRIBUTED PROGRAMS 
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A great deal of tine, however, is saved by using a disk 
memory. 

MINIMUM SYSTEM REQUIREMENTS - The 1620 computer and 60K 
core storage, a 1622 Card-EeaSer-Punch and a disk drive 
is reguired. 

PROGRAMMING SYSTEMS - The program uses the Compiler System, 
Monitor XI on the IBM 1620 Model II. The source language 
is FORTRAN II. 

BASIC FEOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABIE - None. 

CEDEEING INFORMATION: PBOGBAM NUMBER 1620060202 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



162 0-06.0^.203 

HP NT - HOFSTBA UJIVEBSITY NONPARAMBTRIC TESTS 



Dr. N. Goldfarb 

Michael Goldberg 



George Goldberg 
J. B. Botolo, Jr. 



DIBECT TECHNICAL INQUIRIES TO: 
Dr. N. Goldfarb 
Director 
Computer Center 
Hofstra University 
Hempstead, New York 11550 

DBSCBIPTION - HUNT is a package of ten programs which may 
be used to perform nonparanetric statistical computations. 
The following nonparametric statistical tests are included: 
Binomial test and Fisher exact probability for 2x2 
table... CBI sguare with contingency coefficient... Cochran 
Q tests — Friedman two way analysis of variance... Kendall 
coefficient of concordance... Kolmogorov-Smirnov one and 
two sample tests... Kruskal-Wallis one way analysis of 
variance by ranks... Mann-Whitney U test... Spearman Rank 
correlation coefficient... Wilcoxon matched-pairs signed 
ranks test. Storage used by each program - 0402-19999. 



PROGRAMMING SYSTEMS 



Britten in PDQ FCRTEAN. 

Card I/O... Automatic 



MINIMUM SYSTEM BEQUIBEMENTS 

Divide... 20K memory. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGBAM NUMBER 1620060203 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620^06.0^205 

Illjjjll IPJHAT CORRELATION PROGRAM 

AOTHOE: Larry I. Havlicek 

DIRECT TECHNICAL INQUIRIES TO: 
Larry L. Havlicek 
Wichita State university 
Wichita, Kansas 67208 

DESCRIPTION - This program is designed to compute the 
Pearson correlation between two variables and is especially 
useful for pre-punched data. The program is flexible as 
to the length and position of each variable and can recycle 
with the same or a different input fornat. The output 
also yields the mean and the standard deviation for each 
variable and the number of pairs of nuabers. Program 
distinguishes blanks from zeros. Up to 99,999 observations. 

Basic 1620, Model 1, 20K, card system, Auto-Divide, and 
Indirect Addressing. SPS. Deck 2 for Floating Point 
hardware. Deck 3 for computers without Floating Point 
hardware. Storage used - 5500. 

BASIC PROGRAM PACKAGE 

documentation - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFCRHATION: PBOGBAM NUMBER 1620060205 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTINUED FROH PRIOR COLUMN 

two groups of data cards. The program is also flexible 
as to the number, length, and format of the variables. 
The output for two groups yields the N, Mean, SD, Variance, 
and the SE of the Mean for each group and the T test and 
the F ratio between the two groups. The output for one 
group of data cards contains the Mean, SD, SE of the Mean, 
and N. Op to 40 1- to 7- digit variables and an N of 
99999. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIBEMENTS Basic 1620, Model 1, 20K, card 
system, Auto-Divide, Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060206 

Indicate M B N 1" in columns 1-3 and the Program number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.207 

THREE FACTOB FACTORIAL ANALYSIS OF VARIANCE 

AUTHOB: Carl F. Voelz 

DIBECT TECHNICAL INCUIBIES TO: 
Carl F. Voelz 

Office of Computer Services 
Ball State University 
Huncie, Indiana 

DESCRIPTION - The purpose of this program is to perform 
A p X Q X B or three factor factorial analysis of variance. 
Inter-cell T-tests are also computed and outputed as well 
as various sums cf sguares and other computational 
evaluations. Any combination of values for P, Q, and R 
may be used subject to storage limitations. 

Any 1620 machine configuration which includes card I/O 
and an off line printer. The program is coded in FORTRAN 
and is written in such a manner as to make it compatible 
with several 1620 FORTRAN Compiler Systems. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGBAM NUMBER 1620060207 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^06.0.208 

SWEEP OUT METHOD FOB DETERMINING RANK OF A MATRIX AND 

DISTANCE BETWEEN POPULATIONS 

AUTHOR: David W. Morrison 

DIRECT TECHNICAL INCUIBIES TO: 
David W. Morrison 
American Viscose Division 
FMC Corporation 
621 Salem Avenue 
Rolla, Missouri 65401 

DESCRIPTION - The programs purpose is two-fold - (1) To 
determine the rank of a matrix by reducing it via the 
pivotal row, column-sweep-out method. Output for this 
phase consists of each pivotal row as constructed. Some 
simple computations utilizing these values will supply 
the solutions of the matrix should any exist. (2) To 
provide a discriminating function which can be of use when 
assigning observed data to population groups. This function 
is Mahalanobis D squared. 

PROGRAMMING SYSTEMS - Written in FORTRAN with Format. 

MINIMUM SYSTEM REQUIREMENTS - 20K Storage. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060208 



Indicate n i 
in columns 



N 1" in columns 1-3 and the Program Number 
4-13 on the IBM Program Order Form. 
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AUTHOR 
DIRECT 



DESCRI 
of pre 



U EOBMAT T TEST MEAN AND STANDARD DEVIATION PROGRAM 

Larry L. Havlicek 

TECHNICAL INQUIRIES TO: 
Larry L. Havlicek 
Wichita State University 
Wichita, Kansas 67208 

ETION - This program is designed for the analysis 
punched data and can be used with either one or 



1620-06.0.210 

BARTLETTS TEST FOR HOMOGENEITY OF VARIANCE 

AUTHOB: David S. Morrison 

DIRECT TECHNICAL INQUIRIES TO: 
David W. Morrison 
621 Salem Avenue 
Rolla, Missouri 65401 

DESCRIPTION - It is sometimes necessary to determine if 
a set of variances could have all come from the same 
universe. Bartletts test for homogeneity of variance 



CONTRIBUTED PROGRAMS 
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provides one method for testing this possibility. The 
progran supplies the statistic of Bartletts test. This 
oust then be compared with the appropriate CHI-squared 
value. The program is capable of handling up to 400 sets 
of variances and degrees of freedom. It is the authors 
opinion that the program can be rewritten in such a way 
as to make dimensioning - and, therefore, limits - 
unnecessary. 

PROGRAMMING SYSTEMS - Britten in FORTRAN with Format. 

MINIMUM SYSTEM REQUIREMENTS - 20K and card I/O. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - Hone. 

ORDERING INFORMATION: PROGBAH NUMBER 1620060210 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Progran Order Form. 



1620-06.0.211 

DESCRIPTIVE STATISTICS 



AUTHOR: Howard K. Morton 



H. s. Clark, Jr. 
Miami University 
Computing Center 
Oxford, Ohio 45056 

DESCRIPTION - This program solves 10 common models of 
analysis of variance with one input pass. The input data 
is punched directly row by row from a summary table, which 
is included in the documentation. Output includes sums 
of sguares, degrees of freedom, and mean squares, with 
a sense switch option for cell sum squares and cell sums. 

Equipment required - 1620 card system, with Auto Divide, 
Indirect Addressing, Floating Point hardware, 1620 Model 
I, 40K. Software can replace Auto Floating Point. 

Programmed in FORTRAN II-D. The program as submitted uses 
seven (7) digit Mantissa length, but can be increased by, 
carefully, decreasing dimensions. 

BASIC PROG8AB PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - Hone. 
ORDERING INFORMATION: PROGRAM NUMBER 1620060213 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
Howard K. Morton 

California State College at Fullerton 
800 N. State College Boulevard 
Fullerton, California 92631 



1620-06.0.214 

ONE PASS CANONICAL CORRELATION PROGRAM 



AUTHOR: C. Mitchell 



DESCRIPTION - Produces for each of as many as 6 variable 
length numeric data fields per card - frequency 
distribution, cumulative percentile rankings, N, maximum 
and minimum values, mean, standard deviation, second, third 
and fourth moments about the mean, measures of skewness 
and kurtosis (g1 and g2) , sum and sun of squared data 
values. Format of input data and sizes of class intervals 
for frequency distributions are specified by user. Permits 
transformation of data values. Especially helpful in 
producing norns tables on psychological or other types 
of test data. Storage used by program is approximately 
10,600 core and 6,176 on disk. 

Eguipnent required - 1620 Model I card systen with disk 
file, drive, S Indirect Addressing. Program is operable 
en 1620 Model I with disk and reader. 

PROGRAMMING SYSTEMS - Britten in FORTRAN II-D. 

Output of frequency distributions and associated percentile 
rankings may be bypassed at option. 



DIRECT TECHNICAL INQUIRIES TO: 
C. Mitchell 

Experimental Therapeutics unit 
P. 0. Box 151 
Norman, Okla. 73069 

DESCRIPTION - An efficient, one-pass version of 1620- 
06.0.137, Canonical Correlation Progran by Rex L. Hurst. 
This version not only gets the canonical weights to naxinize 
correlations between two sets of variables, but it also 
gets the canonical loadings which are useful for inferring 
the factor structure of the input data. Standard 
mathematical procedures are used. Maximum number of 
variables is 58 for 60K, 37 for 40K. Equipment required: 
card, 1620 Model I. Can be used on 40K 1620 machine by 
reducing dimension statements. Can be broken in two parts 
to run on 20K 1620. Programmed in: FOBTBAN with Format. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 



EASIC PROGRAM PACKAGE 

COCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDEBING INFORMATION: PROGRAM NUMBER 1620060211 



ORDERING INFORMATION: PROGRAM NUMBER 1620060214 



Indicate "B N 1" in colunns 1-3 and the Program Number 
in columns 4-13 on the IBM Progran Order Form. 



Indicate "E N 1 M in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Progran Order Form. 



1620^06.0^.215 

CORRELATION COEFFICIENT PROGRAM 



1620-06.0.212 

KAEBER METHOD OF ANALYSIS MONPARAMETRIC ESTIMATES OF MEAN 

AND STANE ARD DEVIATION 

AUTHORS: Dr. H. J. Highland Helen Gircffi 



AUTHOB: 



Irvin 



DIEECT TECHNICAL INQUIBIES TO: 
H. D. Irvin 
149 Louise Drive, SE 
Concord, N. C. 



DIRECT TECHNICAL INQUIRIES TO: 

Dr. H. J. Highland 
The Brooklyn Center 
Long Island University 
Brooklyn, New York 11201 

DESCRIPTION - Program provides very good estimates of both 
the mean, and the standard deviation, of the distribution 
of critical levels in most laboratory situations. It can 

be used with any distribution up to a maximun of 15 class 
intervals. Storage used - 17,939 to 19,999 for symbol 
table and 8,300 to 12,634 for program. 

Equipment required - Minimum 1620 20K Unit with card I/O. 

Programming type - FORTBAN with Format. Language used 
in writeup - FORTRAN I. 



DESCBIPTION - This program is designed to calculate R and 
R squared (where E eguals correlation coefficient) for 
any two sets of test scores. Hhen there are more than 
two sets, the program calculates R and B squared for all 
possible combinations of the sets of test scores, taking 
them two sets at a time. There nay be a maximum of 45 
different sets of test scores, and a maximum of 125 
individuals who may or may not have taken all tests. The 
individual scores may not exceed a three digit number. 
Equipment specifications: 20K memory, 1620 with Autonatic 
Division, and 1622 Card Bead Punch features are required. 
Source language: SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060215 



EASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 



Indicate M B 
in colunns 



N 1" in columns 1-3 and the Program 
1-13 on the IBM Progran Order Form. 



ORDERING INFORMATION: PROGRAM NUMBER 1620060212 



Indicate "E N 1" in colunns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Forn. 



1 6 2 Z 06 ..0.213 

ill MODEL-EQUAL CELL SIZE-HON-SORT-ANOV 

AUTHOR: H. S. Clark, Jr. 

DIRECT TECHNICAL INQUIRIES TO: 



1620-06.0.216 

STATISTICAL PROJECT ORGANIZER FOR TEACHING 

AUTHOR: Dr. H. J. Highland 

DIEECT TECHNICAL INQUIRIES TO: 
Dr. H. J. Highland 
Conputer Laboratory 
The Brooklyn Center 
Long Island University 
Brooklyn, New York 



CONTRIBUTED PROGRAMS 
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DESCRIPTION - A Statistical Project Organizer for Teaching 
consists of two independent bat interrelated programs: 
(a) Frequency array generator, and (b) Basic statistics 
for frequency array, and is part of the CO/STATS (Coaputer 
Oriented/Statistical Teaching and Testing Series) programs. 
The two programs are an aid to teachers who wish to provide 
students with individualized ran data for analysis for 
student statistics projects. The first program consists 
of tvo phases under switch control. Phase I, using Sturges 
rule, will deteraine the number of class intervals and 
size of the class interval for the series. Phase II will 
transform raw data into a statistical array using class 
interval size and number of class intervals at the users 
option. The second program will produce the conventional 
frequency array listing class intervals, frequency, d, 
d squared, fd and fd squared used in computations. It 
will also provide the user with various measures of central 
tendency and dispersion among which are mean, adjusted 
mode, median, Q sub 1, Q sub 3, guartile deviation, standard 
deviation, coefficient of variation, coefficient of skewness 
(both Pearson and guartile methods) and K, the center value 
of a normal distribution. Also included is a sample student 
statistical project form for use with these programs. 

MINIMUM SYSTEM REQUIREMENTS - Basic 20K IBM 1620 Model 

I without any special features. Card input/output required, 

as well as a card printer, such as the IBB 107. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE BEADABLE - Hone. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620060216 

Indicate "B H 1" in columns 1-3 and the Program Humber 
in columns 4-13 on the IBM Program Order Form. 



16 2^06^0^217 

CORRELATIONS OF A£L PAIR WISE C OMBINATIO NS OF. T_WO SETS OF 
VARIABLES 



16.20-06.0.219 

WILCOXOH TWO-SAMPLE TE§T 

AUTHORS: G. Gnugnoli B. Maisel 

DIBECT TECHNICAL INQUIRIES TO: 
G. Gnugnoli 
Georgetown University 
Computation center 
Washington, D. C. 

DESCBIPTIOH - The Nilcoxon two-sample test permits a non- 
parametric, distribution-free comparison of the levels 
of two sets of observations. It is based on the sum of 
the rank orders of the observations in one of the samples 
in the set consisting in the two samples combined. This 
sum is then converted to a statistic that is approximately 
normally distributed with mean zero and variance one to 
facilitate tests of significance. The output includes: 
the normally distributed statistic, the average rank order 
of each of the two sets of observations and the number 
of observations in each of the two sets. The program was 
written in FORTRAN II-D with punched card input-output. 
It could be easily modified to permit printer output and 
to function in the absence of a monitor system. Multiple 
jobs can be stacked. Storage used: 60K, storage used is 
a function of sample size; smaller capacity would 
necessitate reducing the maximum permissable sample sizes- 
see no. 8 below. Equipment required: Card I/O; Disk File; 
1620 Model II. Requirements which can be easily removed 
are: Card Output, Disk File (only monitor feature is used). 
Model II coaputer (i.e. All requirements can be easily 
removed). Programmed in: FORTRAN II Mainline, complete. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060219 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHORS: D. Wright 



Raisel 



DIRECT TECHNICAL INQUIRIES TO: 
D. Wright 

Georgetown University 
Computation Center 
37th and Sts, NW 
Washington, D. C. 20007 

DESCRIPTION - In many exploratory experiments-particularly 
in the health sciences-one set of variables is clearly 
independent and another dependent but little is known about 
the relaticnships. This program computes correlation 
coefficients for all pairwise combinations of these two 
sets of variables. Means and standard deviations can also 
be computed at the option of the user. Five digits are 
allowed for recording the individual observations. This 
means, for example, that positive integer variables can 
have no more than five digits and positive variables with 
digits to the right of the decimal no sore than four. 
The maximui number of variables in each of the two sets 
is 15. The number of observations for each variable is 
assumed to be the same for all +N variables. Written in 
FORTRAN for a 1620 with card I/O, approximately 25,000 
positions of core are required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060217 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 2 0-0 6.0.. 21 8 

NCKPARAHETSIC TWO^WAI ANAI-xSIS OF VARIANCE WITH N 
OBSERVATIONS PER CELL 

AUTHOR: R. F. Ling 

DIRECT TECHNICAL INQUIRIES TO: 
R. F. Ling 

East Tennessee State State University 
Johnson City, Tennessee 



1620-06.0. 220 

ITE M ANALYSIS FOR 1230 OPTICAL HARK SCORING READER OUTPUT 



AUTHOR: 



R. T. Johnson 



DIRECT TECHNICAL IHQOIRIES TO: 
R. T. Johnson 
Box 3094 

Lagos, Nigeria 

DESCRIPTION - The program takes the coded IBM 1230 output 
and performs an item analysis for each of the five 
alternatives to a total of up to 150 questions in a single 
pass. Output is the mean and variance for the criterion 
score, followed by proportion of the subjects choosing 
each alternative, and point-biserial correlation of each 
alternative with the criterion score. Point Biserials 
are calculated using formula 13.13 of Guilfords Fundamental 
Statistics in Psychology and Education. The program as 
written assumes two questions (segments) per 1230 word 
length of five alternatives each, and a three-column 
criterion score. If fewer alternatives are used, or only 
one segment out of a word, the program will punch zeros 
for the missing information. Thus questions of any size 
response length can be handled, one card per subject is 
assumed. Using the output of the IBM 1230 Optical Mark 
Scoring Reader directly as input to the 1620 presents 
problems in that the 1230 output is either punched such 
that it must be read in column binary, or coded in a 
readable character which bears little relation to the 
original format. In the former case, a response of 
alternative "D" for question one and alternative "A" for 
question two would be punched as a four and a six in a 
single column. The alternative choice of 1230 output is 
production cf an alphameric character to represent both 
answers — in this case a /. Equipment Specifications 
are: A 20K card system with Automatic Divide, and Indirect 
Addressing, TNS, TNF, MF. Additional remarks: SPS, fixed 
point calculations, relocatable, input speed approximately 
100 cards per minute for a 100 question examination. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 
ORDERING INFORMATION: PROGRAM NUMBER 1620060220 



DESCRIPTION - A nonparametric test of the null hypothesis 
that the distributions of possible observations for the 
K levels of the treatment are egual in all blocks. 
Alternative to the parametric F-test in the analysis of 
variance problem. The program is written in FORTRAN II 
for the 1620 Model 1 FORTRAN System with Automatic Divide, 
Indirect Addressing, and 1622 Card Read Punch, 40K memory. 
However, program may easily be modified for any 1620 FORTRAN 
Systems. 



Indicate "I 
in columns 



N 1" in columns 1-3 and the Progran Number 
4-13 on the IBM Program Order Form. 



1620-06.0.221 

80 DE FOR 1443 PRINTER 



AUTHOR: A. R. Eckert 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060218 

Indicate "B N 1" in columns 1-3 and the Prograi Number 
in columns 4-13 on the IBM Program Order Form. 



DIBECT TECHNICAL INQUIRIES TO: 
A. R. Eckert 

Dept. of Agricultural Economics 
University of Nebraska 
Lincoln, Nebraska 68503 

DESCRIPTION - This program is a printer adaptation of 
section 80 D of the 80-Series Multiple Regression System 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PEIOE PAGE 



CONTINUED FBOM PBIOE COLUMN 



by Janes N. Boles (1620-06.0. 1*13) . It computes actual 
and expected value, and residues for data used in these 
series. Modifications include the step number which is 
added to the problem specifications. The printed page 
is divided into a right and left section thus separating 
the computed output from the list of data. If raw or 
transformed data are listed, sense switch 3 permits to 
punch simultaneously. The card image is that of the printed 
line with a field of sequence numbers added. The computed 
output is expanded to include a column of cumulative 
residues. Indications of curvelinearity and other 
characteristics become visible when data are processed 
after appropriate sorting, storage used by program: 18,000 
locations. Equipment required: 1620 Model 1, cards, 1443 
Printer, Indirect Addressing, THE, MF. Programming type: 
SPS II modified by machine language, self restoring. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE EEADABLE - None. 



than an eight digit mantissa. Re have found that with 
a 20 digit mantissa we can work with K up to 35. Storage 
used by program is 54,625 with plot and 20 digit mantissa, 
31,677 without plot and with 8 digit mantissa. Equipment 
required by program: 1620 card system with Disk File, Auto 
Divide, Indirect Addressing, Floating Point hardware. Model 
II, and a 1627 Plotter. Program can be used on lesser 
machine with appropriate modification of source program. 
Programmed in FORTRAN II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060223 

Indicate **B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



ORDERING INFORMATION: PROGRAM NUMBER 1620060221 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^06^0^.224 

FACTORIAL ANALYSIS OF VARIANCE AND COVARIANCE 



AUTHOR: 



R. L. Hurst 



80 EE FOR 1443 PRINTER 



ADTHOR: 



R. Eckert 



DIRECT TECHNICAL INQUIRIES TO; 

A. R. Eckert 

Dept. of Agricultural Economics 
University of Nebraska 
Lincoln, Nebraska 68503 

DESCRIPTION - This program is a printer adaptation of 
section 80 B of the 80-Series Multiple Begression System 
by James N. Boles (1620-06.0.143). It prints the report 
from cards produced by sections 80-1 to 80-4. The general 
layout of the report is retained, however, blank lines 
that result from supradiagonal matrices are omitted and 
asterisks are used to indicate the beginning of matrix 
rows. A new format conversion uses variable decimal point 
positions to prevent the truncation of information while 
reducing the need for exponents to conditions of: 8 less 
than Exp less than 0. Exponents follow the matissa from 
which they are separated by their minus sign or the letter 
E. An error report is added which resets the program to 
start after typing SEQUENCE DATA. Operator instructions 
are largely retained. 8170 location positions of storage 
are used. Equipment reguired: 1620 Model 1, cards, 1443 
Printer, Indirect Addressing, TNF, HF. Programmed in 
machine language, relocable 12-module, self -restoring. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 



DIRECT TECHNICAL INQUIRIES TO: 
R. L. Hurst 
Computer Center 
Utah State University 
Logan, Utah 

DESCRIPTION - This set of programs will compute a factorial 
analysis of variance and/or covariance on most balanced 
factorial designs. It will handle up to 8 factors, up 
to 99 levels per factor, up to 9999 observations and up 
to 27 variables. It will handle some types cf fractorial 
replicate designs. Multivariate tests are available either 
with or without covariance. Provisions are made for 
partitioning treatment and error sums of squares/degrees 
of freedom. Treatment means and variances of treatment 
neans, adjusted for covariance, can be obtained. A separate 
program can be used to sequence check input data. 

PROGRAMMING SYSTEMS - Written in FOBTRAH II. 

MINIMUM SYSTEM REQUIREMENTS - A 40K 1620 card system with 
TNS, TNF, MF, Auto Divide and Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060224 
Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.225 

GENERAL PURPOSE ANALYSIS OF VARIANCE SYSTEM 



ORDERING INFORMATION: PROGRAM NUMBER 1620060222 



AUTHOR: David Owen 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.223 

EEST K OF 2K-1 COMPARISONS 



AUTHORS: H. Maisel 



D. Wright 



DIRECT TECHNICAL INQUIRIES TO: 
H. Maisel 

Georgetown University 
Computation Center 
Science Bldg. 
Washington, D. C. 

DESCRIPTION - The Best K of 2K-1 Comparison is a popular 
procedure for choosing between two competitors in athletic 
competitions. In an article in the June 1966 issue of 
the Journal of the American Statistical Association, this 
test was studied with a view toward using it to decide 
between two alternative courses of action, A and B. This 
computer program permits a potential user of the test to 
choose K in an optimum manner. The user specifies an a 
priori density for the parameter, P, and a priori cost 
functions for the conseguences of his decisions. (These 
cost functions are denoted by CA and CB.) The program 
will provide as output in each run: 

1) A plot of the a priori density and cost functions so that 
the user may verify his input. 

2) An error message if the area under the a priori density 
differs from 1 by more than .01. 

3) The savings to be gained from conducting the test as a 
function of K. 

The program can be used repeatedly to determine the 
sensitivity of the choice of K to changes in the assumptions 
regarding the density and cost functions. Sense switch 
options permitdeletion of the plot, verification of input 
data, and the stacking of several jobs. A plot of the 
time reguired to execute the program as a function of K 
is included in the write-up. No special operational 
problems - except to note that the program uses subroutines. 
Because of a loss in accuracy it is necessary to use more 



DIRECT TECHNICAL INQUIRIES TO: 

David Owen 
2822 Minnesota 
Joplin, Mo. 64801 

DESCRIPTION - A disk-stored system of 31 interdependent 
routines accomplish a full-model analysis of variance. 
A summary table identifies the source of each interaction, 
sums of sguares, DF, mean squares, error term index, F, 
and cumulative probability of F for each interaction. 
Intermediate output includes an EMS matrix, sums and means 
of combinations of cells, and tern values. The system 
requires all zero order interactions, a card identifying 
factors as fixed or random, and score cards with factor 
indices. The routine types a message and halts at the 
conclusion of each analysis allowing operator action to 
determine which of three branches to execute in seeking 
another job. Treating subjects or replications as a factor 
in the analysis, up to a seven-way analysis of variance 
can be executed with any arrangement of nesting factors 
and fixed/random factors. If an eighth factor is nested 
within all other factors, the user may process an eight- 
way analysis of variance. Each cell in the design must 
contain an equal number of scores, at any particular level. 
Depending upon the arrangement of nested factors, a sample 
size up to 9999 may be processed. Storage used by program- 
All routines must be disk-stored with appropriate DIM and 
EQUIVALENCE table entries. The system uses 974 sectors 
for permanent storage with main links in core image. The 
DISKSS link reguires the maximum in-core storage of 19,995 
cores; the DISKSS link may use a maximum of 4,368 work 
sectors. 

PROGRAMMING SYSTEMS - Written in FOBTBAN II-D and runs 
under Monitor I System. 

MINIMUM SYSTEM REQUIREMENTS - 20K-1620 Model 1; Automatic 
Divide; Indirect Addressing; one 1311 Disk Storage Drive; 

1622 Card Read-Punch; and 1443 Printer. Printed output 
may be converted tc another device with slight program 
modification-. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 



CONTRIBUTED PROGRAMS 



CONTINUED FRCN PRIOR PAGE 

CBDEBING INFORMATION: PROGRAM NUHBER 1620060225 



Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620-06.0.227 

lElSUHCiES SHOWN BENEATH CLASS MAXIMA 



AUTHOR: 



Alfred R. Eckert 



DIRECT TECHNICAL INQUIRIES TC: 
Alfred R. Eckert 
Dept. of Agricultural Econonics 
University of Nebraska 
Lincoln, Nebr. 68503 

DESCRIPTION - Frequency counter cells are specified by 
their positions along a scale or list of class maxima. 
The program employs a look-up routine to patch data with 
the scale and increases the appropriate count. The look- 
up routine permits scales of irregular intervals or lists, 
which can be entered from punch cards. Scales of uniform 
intervals can be developed by the progran from 
specifications of low-point, high-point and interval, when 
given on a code card. The number of positions held by 
significant digits in the numeric- largest class maximum 
(2-7 for computed scales and 2-10 for listed scales) 
specifies the positions available in counter cells. It 
also specifies the leading sector of the data field that 
is used in the comparisons. This sector of the data field 
is increased by one whenever a sector remaining outside 
comparison is non-zero. The length of the combined sectors 
may be 2 - 28 positions; sign flag positions could be even 
further up. Data fields, specified. by their card columns, 
may be read from cards that are consecutive or part of 
data blocks consisting of up to nine cards. The data 
format may be numeric fixed point flagged or unflagged, 
numeric (internal) floating point, alphameric fixed point 
signed or unsigned, or alphameric floating point. The 
number of data cards is limited only by the capacity 
programmed per counter, since the first of these shows 
the total of recorded observations. The progran occupies 
core positions 00080 - 05540. The remaining core capacity 
can be egually divided among scale and corresponding counter 
cells. 

PROGRAMMING SYSTEMS - Britten in machine language, 
relocatable 12-module, self-restoring. 

MINIMUM SYSTEM REQUIBEHENTS - IBM 1620 Model 1, Auto-Divide, 
Ind-Addr., MF, TNF, card and 1443 Printer. Modification 
to output on typewriter are provided. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060227 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



CONTINUED FROM PRIOR COLUMN 

signed, or alphameric floating point. 

Data field or exponent may be anywhere along its card, 
with up to 28 digits being evaluated. No limitation to 
the sequence or number of observations, storage used- 
00100 - 10000 exclusive of table. Speed- Slightly below 
1622 Card Reader and output device. 

PROGRAMMING SYSTEMS - Machine language, relocatable 12- 
module, self-restoring. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 Model 1, Ind. Addr; 
MF, TNF, cards and 1443 Printer. Modification for 
typewriter or card output are provided. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. on Microfiche only. 
MACHINE READABLE - None. 

OEDERING INFORMATION: PEOGEAM NUMBEE 1620060228 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBM Program Order Form. 



1620-06.0.229 

FIVE CHOICE ITEM ANALYSIS PEOGEAM 

AUTHOR: John F. Gugel 

DIRECT TECHNICAL INQUIRIES TO: 
John F. Gugel 

Office of Institutional Research 
Hunter College 
695 Park Ave. 
New York, N. Y. 10021 

DESCRIPTION - This program suns up the number of omits 
and choices A to I (1 or 5) made to each guestion. It 
also gives percentage choosing each alternative, average 
difficulty, point biserial correlation. Guildford weight, 
mean and standard. 

PROGRAMMING SYSTEMS - Britten in SPS. 

MINIMUM SYSTEM REQUIREMENTS - A 20K Card System with Auto 
Divide and TNS, TNF, MF. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PEOGEAM PACKAGE - None. 

ORDERING INFORMATION: PEOGRAM NUMBER 1620060229 



PEOGEAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTBIBUTION MEDIUM 
TYPE CODE 



CABDS 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620^06^0^228 

SCATTER DIAGRAM OF DATA FHJOJJEHCIES 



AUTHOR: 



Alfred R. Eckert 



1620 = 06.iL,230 

DOUBLE COUNT PUNCH COUNT PEOGEAM 



AUTHOR: 



John F. Gugel 



DIRECT TECHNICAL INQUIRIES TO: 
Alfred R. Eckert 
Dept. of Agricultural Economics 
University of Nebraska 
Lincoln, Nebr. 68503 

DESCRIPTION - Arithmetic scales of class mexima form the 
coordinates to a table of counter cells for frequencies. 
Codes specify counter cells cf 2 - 9 digits; the independent 
two ranges of maxima and their intervals in 2 - 7 digits. 
The entire core capacity is normally made available to 
the program, yet it can be limited. The minimum is 10K 
plus 1.01 times the positions needed for the counter cells 
in one X-row. x-scales that exceed the width of the page 
are continued on an unlimited number of matching pages. 
Tables that exceed the core capacity are developed in 
sections along the Y-scale and reguire repeated read-ins 
of data. Options include- 

(a) The alignment of data to scales can be typed for 
inspection. 

(b) Data outside the scales are rejected and these cards 
can be typed. 

(c) One or more data decks of different formats can be 
recorded into the same table. 

(d) The core address of every counter increase can be 
punched along with a specified identifier field copied 
from the X-data card. (These cards to be used in N-th 
factor diagrams) . 

(e) In lieu of counting frequencies the existence of a 
given data combination can be symbolized by entering 
the letter in counter cells that remained blank. 
This permits, for example, to read and enter the 
predicted values from a regression analysis. Data may 
be on one or two cards in either sequence, or may be 
parts of data blocks consisting of up to 9 cards. 
Formats of X and Y data are independent and either may 
be numeric fixed point flagged or unflagged, numeric 
floating point, or alphameric fixed point unsigned or 



DIRECT TECHNICAL INCUIBIES fo: 
John F. Gugel 

Office of Institutional Research 
Hunter College 
695 Park Ave. 
New York, N. Y. 10021 

DESCRIPTION - This program will give the double column 
punch frequencies for up to forty pairs of numbers on a 
data card. Blanks are treated separately from zeroes and 
a count is given for each separately. Each number is 
checked for blanks on the low order (units) digit only, 
thus the tens digit may be blank if the units digit is 
not. Numbers may go from blank to 99. & total of 9,999 
cases may be processed at one time. Percentages of the 
total for each number. Output may be either by typewriter 
or on cards. Jobs nay be stacked. 

Program reguires a 20K card system with Auto Divide and 
TNS, TNF, MF. Programmed in SPS. 

BASIC PEOGEAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGBAM NUMBEE 1620060230 

Indicate "B N 1 H in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06^0. 2J1 

BREAKDOWN AND TALLY PROGRAM iTALLYJL 



AUTHOR: John F. Gugel 



DIRECT TECHNICAL INCUIBIES TO: 
John F. Gugel 



CONTRIBUTED PROGRAHS 



CONTINUED FROM PRIOR PAGE 



CONTINUED FROM PRIOR COLDHN 



Office of Institutional Research 

Hunter College 

695 Park Ave. 

Ne« York, N. Y. 10021 

descbiptioh - This program breaks down data cards into 
groups according to a chosen column and gives the suns 
of blank and zero to nine in each of up to thirty other 
columns in each of these groups. It gives first the totals 
of the blanks and zero to nine in each column of the thirty 
columns of all groups taken together then the same for 
each group individually. Data may come from one or two 
cards at a time. Percentages of the total number of cases 
for each tally may also be given. Jobs nay be stacked. 
Output is either by typewriter or on cards. Non-numeric 
data is treated as blank data. Program reguires a 20K 
card system with Auto Divide and TNS, TNF, HF. Programmed 
in' SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - irite-up on Hicrofiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060231 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620306^0^.232 

TJST SCORE FREQUENCY DISTRIBUTION P ROGR AM 

AUTHOR: John F. Gugel 

DIRECT TECHNICAL INQUIRIES TO: 
John F. Gugel 

office of institutional Research 
Hunter College 
695 Park Ave. 
New York, N. Y. 10021 

DESCRIPTION - This program accepts data from anywhere on 
the data card and gives score, freguency, cumulative 
f reguency, percentile, mean, standard deviation, and 
guartiles. There is also an option for standard scores. 
Blank (in low order digit (units) only) cards are not 
counted in the distribution but a count is made of them 
and is typed out at the end. Zero scores may be counted 
or rejected. Jobs may be stacked if a card with a record 
mark (0-2-8 multi-punch) in column 1 precedes the header 
card of the next job. Scroes may be from 1 to 3 digits 
in length, and from 000 to 998 in range, only zero and 
positive numbers may be used. Program reguires a 20K card 
system with Auto Divide and TNS, TNF, MS. Programmed in 
SPS. 

EASIC PROGRAM PACKAGE " X \ 

DOCUMENTATION - write-up on Hicrofiche only. 
MACHINE READABLE - None. 

CRDEEING INFORMATION: PROGRAM NUMBER 1620060232 

Indicate "E N 1" in columns 1-3 and the Erogram Number 
in columns 4-13 on the IBM Program Order Form. 



1620=06.0^233 

OSl^ifO^IHIlEJ WAY ANALYSIS OF VARIANCE 

AUTHOR: John F. Gugel 

DIRECT TECHNICAL INQUIRIES TO: 
John F. Gugel 

Office of Institutional Research 
Hunter college 
695 Park Ave. 
New York, N. Y. 10021 

DESCRIPTION - This program is set up to do either a one 
way (simple), a two-way, or a three-way analysis of 
variance. In the two and three way designs each subject 
is represented only once (not replicated) . 

Program reguires a 20K card system with Auto Divide and 
TNS, TNF, MF. Programmed in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060233 



DESCRIPTION - This program scores a test in two designated 
halves and then correlates the scores of the two halves. 
Output is means and standard deviations for each half; 
N and split half correlation followed by the Spearman-Brown 
Reliability Estimate. Program reguires a 20K card system 
with Auto Divide and TNS, TNF, MF. Programmed in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060234 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^06^235 

CAED COLUMN PUNCH COUNT 



AUTHOR: 



Mr. John F. Gugel 



DIRECT TECHNICAL INQUIRIES TO: 

Mr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. Y. 

DESCRIPTION - This program will give a count of blanks 
and the punches to 9 in given columns. Percentages of 
the total for each count are given as an option. Output 
may be either on the typewriter or on cards. Jobs may 
be stacked. Program reguires a 20K card system with Auto 
Divide and TNS, TNF, MF. Programmed in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060235 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 = 06.0i236 

LAPHA TRANS 



AUTHOR: Mr. John F. Gugel 
DIBECT TECHNICAL INQUIRIES TO: 

Mr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. Y. 

DESCRIPTION - This program is designed to make it possible 
to put in the whole alphabet by IBM 1230 Optional Mark 
Scoring Reader in one passing using a standard to 9 
coding answer sheet. The letters A to I are put out by 
the 1230 as the numbers 1 to 9 and these numbers are 
translated, in the columns designated on the header card, 
into the letters A to I by the 1620. Zeroes and alphameric 
data in the designated columns and all data outside of 
the designated columns ana all data outside of the 
designated columns are reproduced without change. A full 
80 columns may be used. Program reguires a 20K card system. 
Programmed in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060236 



Indicate "B t 

in columns 4- 



1" in columns 1-3 and the Program Number 
13 on the IBM Program Order Form. 



1620-06.0.237 

TABLE LOOK-UP PHCGEAM 



AUTHOR: 



Mr. John F. Gugel 



DIBECT TECHNICAL INQUIRIES TO: 
Mr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. Yv 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620306^0^234 

1112 CHOICE SPLIT-HALF RELIABILITY PROGRAM WITH UNPACKING 
OPTION 



AUTHOR: Mr. John F. Gugel 

DIRECT TECHNICAL INQUIRIES TO: 
Mr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. Y. 



DESCRIPTION - This program may be used to perform one way 
or two way table look-ups. If used two-way as in processing 
of the Lorge-Thorndike IQ test, it picks out one score 
for two. An I Q score is picked out for a given raw score 
and a given chronological aoe. If used one-way as when 
converting Stanford Achievements Tests raw scores to grade 
equivalents, a converted score is given for each raw score. 
Output is either on the typewriter or on cards. Dimensions 
are up to 25 across and up to 200 down. This means that 
if it is used two way as with the Lorge-Thorndike, there 
may be 25 columns of first scores (chronological ages) 
and up to 200 possible conversion scores (IQ scores) for 
each if there are that many raw scores. If used one way 
there may be up to 200 possible conversion scores for each 
raw score. Program reguires a 20K card system with TNS, 
TNF, MF. Programmed in SPS. 



PAGE 072 1620 

CONTINUED FBOH PBIOB ?AGE 

BASIC PRCGRAM PACKAGE 

DOCUMENTATION - Hrite-up oh Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORHATION: PROGRAM NUHBEB 1620060237 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620^06.0^238 

SPS UNPACKING 



CONTRIBUTED PROGRAMS 

1620 
CONTINUED FBOH PBIOB COLUMN 

in columns 4-13 on the IBM Program Order Form 



AUTHOR: 



Mr. John F. Gugel 



DIBECT TECHNICAL INQUIRIES TO: 
Hr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. I. 

DESCBIPTION - This program is designed to unpack the special 
coae put out by the IBB 1230 Optical Hark Scoring Beader 
when the 3 punch is used on the 534 Key Punch drum card. 
It splits each column of input into 2 columns of output 
and one card of input becomes 2 cards of output if data 
is punched beyond column 42. Column 43 is split between 
2 cards of output. Columns 1 to 5 are used for the 
identification number. Only the digits 0-9 nay be used 
in this space and will be punched out in 1-5 of both output 
cards (if 2 cards output is used) . Program reguires a 
20K card system. Programmed in SPS. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PBOGBAH NUHBEB 1620060238 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



Jl620 z 06_.i..23J 

40X40 MEAN STANDARD DEVIATION AND INTEJCCRRELATICN PROGRAM 



AUTHOR: 



Hr. John F. Gugel 



DIRECT TECHNICAL INQOIBIES TO: 
Mr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. I. 

DESCRIPTION - This program calculates means, standard 
deviations, and intercorrelations on up to 40 variables. 
It will do all at the same time or it may be used to give 
separately means and standard deviations or 
intercorrelations. Standard deviations are calculated 
on the basis of N rather than degrees of freedom. Data 
nay be from one to five digits in length. Jobs may be 
stacked. Data may come from up to four cards at a time. 
Data may be zero or positive. Negative data may not be 
processed without the addition of a constant to make it 
positive. Input is completely flexible. Program reguires 
a 20K card system with Auto Divide and TNS, TNF, HF. 
Programmed in SPS. 

BASIC PROGBAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUHBEB 1620060239 

Indicate n B N 1 n in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



16 20^06.(^.240 

12112 HISSING BA.TA 

AUTHOR: Hr. John F. Gugel 

DIBECT TECHNICAL INQUIRIES TO: 
Mr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. Y. 

DESCRIPTION - This program calculates means, standard 
deviations, and intercorrelations on up to 19 variables. 
It will do all at the same time or it may be used to give 
separately means and standard deviations or 
intercorrelations. It checks the low order digit of each 
variable for blanks. Adjustments are made whenever one 
or both variables in a pair are blank. Program reguires 
a 20K card system with Auto Divide and TNS, TNF, HF. It 
can easily be expanded for a larger machine. Programmed 
in SPS. 

BASIC PRCGEAM PACKAGE 

EOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PBOGRAB NUMBER 1620060240 

Indicate M E N 1 n in columns 1-3 and the Program Number 



16 20-06.0 .241 

UIGHTS PROGRAM 

AUTHOR: Charles Hatounian 

DIBECT TECHNICAL INQUIRIES TO: 
Mr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. Y» 

DESCBIPTION - This program allows the summing up of 
different values from -9 to plus 9 assigned to the punches 
to 9 in a given column. Each possible punch in the 
column may have a different value. Each column may belong 
to any one of from one to ten factor groups. The data 
may be on from one to six cards. The identification number 
for each card can appear anywhere on the card and must 
be of length greater than one and smaller than six. Output 
can be on the typewriter and/or on cards. This program 
can be used for attitude, etc., tests and for split half 
test reliabilities. Program requires a 20K card system 
with TNS, TNF, HF. Programmed in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDEBING INFORMATION: PBOGRAM NUHBEB 1620060241 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.242 

IzIEST PROGRAM FOR 19X19 MISSING DATA AND 40X40 MEANj. SD AND 
INTERCORHELATIOH 

AUTHOR: Mr. John F. Gugel 

DIRECT TECHNICAL INQUIRIES TO: 
Mr. John F. Gugel 
Hunter College 
695 Park Ave. 
New York, N. Y. 

DESCRIPTION - This program types the two labels, each mean, 
standard deviation, standard error of the mean, T for 
homogeneous variance (same population variance) , T for 
non-homogeneous variance (different population variance), 
and the ratio of the variances. The variance ratio is 
always set up to be one or greater - the smaller is always 
divided into the larger. To determine which T is to apply 
the variance ratio may be used with an F table. Input 
data for this program is the output data for either the 
40X40 or the 19X19 programs when sense Switch 1 is on. 
No header cards are reguired beyond those used in the 
original data. Program requires a 20K 1620 Model I card 
system with Auto Divide and TNS, TNF, HF. Programmed in 
SPS. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Hicrofiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620060242 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



16 2 0^0 6_- 0.24 3 *M 

MISSING DATA MEAN AND STANDARD DEVIATION SORT PBOGRAM BITH 
FLEXIBLE INPUT 

AUTHOR: Mr. John F. Gugel 

DIRECT TECHNICAL INQUIRIES TO: 
Mr. John F. Gugel 
Office of Institutional Research 
Hunter College 
695 Park Ave. 
Hew York, N. Y. 10021 

DESCRIPTION - This program breaks down input data into 
groups according to punches (blank and to 9) in a 
specified (control) column. For each group means and 
standard deviations are then calculated on up to thirty 
variables. A variable with a blank may be from one to 
five digits in length. Data may coae from up to four cards 
at a time. Data must be zero or positive. Negative data 
can not be processed without the addition of a constant 
to make it positive. Input is completely flexible. 
Standard deviations are calculated on the basis of N rather 
than degrees of freedom. Program reguires a 20K card 
system with Auto Divide and TNS, TNF, HF. Programmed in 
SPS. 

BASIC PROGRAM PACKAGE 

DOCDMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060243 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

Indicate "E N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBB Program Order Form. 



1620^06^0.244 

SIMPLE ANALYSIS OF. VARIANCE WITH T^TEST OPTION 

AUTHOR: Br. John F. Gugel 

DIRECT TECHNICAL INQUIRIES TC: 
Br. John F. Gugel 
Office of Institutional Research 
Hunter College 
695 Park Ave 
New York, N.Y. 10021 

DESCRIPTION - This program calculates means, standard 
deviations, sums of sguares within and between, mean squares 
between and within, the F test and T-tests between each 
group. Blank data is skipped over completely. Any number 
with a blank in the low order (units) position is considered 
to be blank. Other digits of the number are not checked 
for blanks. Input is flexible, so data may be anywhere 
on the card. Jobs may be stacked. Output is either by 
typewriter or on cards. Data may be from one to five- 
digits in length. Upto 99,999 cases overall or up to that 
number in any group may be processed. Data must be zero 
or positive. Program reguires a 20K card system with Auto 
Divide and TNS, TNF, HF. Programmed in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

CRDERING INFORMATION: PROGRAM NUMBER 1620060244 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



J620 z 06_..0.245 

FITTING POISSOM BINOMIAL DISTjUBUTIONS 



AUTHORS: B. R. Russell 



C.R. Heaver 



DIRECT TECHNICAL INQUIRIES TO: 
C.R. Heaver 
Oardc 
Booster, Ohio 44691 

DESCRIPTION - The method of maximum liklihood is used to 
determine the parameters of the Poisson Binomial Formula 
to fit the frequencies of an observed distribution. 
Probabilities, cumulative probabilities, expected 
frequencies, and chi-sguare are computed. The program 
provides an initial estimate of the parameter P based on 
the moments of the observed distribution. A stepwise 
search procedure for the root of the equation in P between 
P equals and P eguals I is available if the initial 
estimated P fails to provide acceptable values. Initial 
values of P may be entered as card input or through the 
typewriter in lieu of the programmed estimate if desired. 
The maximum number of cells in the distribution to be 
fitted is 100, including the zeroth cell. FORCOM 
subroutines are used to make the distribution data input 
formats more flexible; distribution data for input cannot 
have decimal points punched. 

Storage used is 23,414. Equipment required is 1622 card 
system. Automatic Divide, Indirect Addressing, 1620 Model 
1, 40K memory. The program cannot be run on a lesser 
machine without recompiling. It is programmed in PDQ 
FORTRAN as a complete mainline program. 

BASIC FROGRAM PACKAGE 

EOCUNENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060245 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1 § 2 Z 06.0.. 2 46 

FITTING DISTRIBUTIONS BITH THE PO ISSON WITH ZEROES 

AUTHORS: E.R. Russell C.R. Heaver 

DIRECT TECHNICAL INQUIRIES TO: 
C.R. Beaver 
Oardc 
Booster, Ohio 44691 

DESCRIPTION - Four types of calculations can be performed 
in fitting a known distribution of events- 1) Finding the 
expected frequencies and chi-sguare when the parameters 
are all known. Finding values of the parameters to fit 
the distribution starting with either 2) An arbitrary value 
for one of the parameters or 3) An initial value for this 
parameter determined by the program from the distribution 
data. In the latter case the program also computes the 
expected freguencies and chi-squares. 4) Finding the 
expected freguencies and chi-sguare on the assumption that 
the distribution is a Poisson rather than a Poisson Binomial 
Type. The method used is maximum likelihood. Kaximum 
number of cells into which the events axe grouped is 100. 



CONTINUED FROM PRIOR COLUMN 

Distribution data for input cannot have decimal points 
punched. Storage used by program is 17454 positions. 
Eguipment required by program: card system 1622, Automatic 
Divide, Indirect Addressing, 40K memory. Program can be 
run on a lesser machine by redimensioning and recompiling. 
It is programmed in PDQ FORTRAN as a complete mainline 
program. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060246 

Indicate "B N 1" in columns 1-3 ana the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620-06.0.247 

FITTING DISTRIBUTIONS HITH THE NEYMAN A FORMULA 

AUTHORS: B.R. Russell C.R. Beaver 

DIRECT TECHNICAL INQUIRIES TO: 
C.R. Beaver 
Oardc 
Booster, Ohio 44691 

DESCRIPTION - This progrAm determines parameters in the 
Neyman A distribution formula to fit an observed 
distribution, finds the expected frequencies and computes 
Chi-Square. Several optional variations are available- 

- Omitting the calculation of expected frequencies and 
Chi-Sguares. 

- Omitting the initial estimates of the parameters provided 
by the program ana supplying initial values as input 
parameters. 

- Omitting the iteration procedure to fit the parameters 
to the distribution, simply computing the expected 
freguencies and Chi-Sguare on the basis of the parameter 
values supplied. 

The parameters to fit the distribution are determined by 
the method of maximum likelihood; The Newton-Raphson 
procedure is used to find the root of the final eguation. 
The maximum number of cells in the distribution to be 
fitted is 150, including the zero cell. FORCCM subroutines 
are used to make the distribution data input formats more 
flexible; distribution data for input cannot have decimal 
points punched. Storage used is 24,146 positions. 
Eguipment required is 1622 card system. Automatic Divide, 
Indirect Addressing, 1620 Hodel 1, 40K memory. The program 
cannot be run on a lesser machine without recompiling. 
It is programmed inPDQ FORTRAN as a complete mainline 
program. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060247 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06_;.0..248 

FITTING NEGATIVE EINCHIAL DISTRIBUTIONS 

AUTHORS: B.R. Russell C.R. Beaver 

DIRECT TECHNICAL INQUIRIES TO: 
C.R. Beaver 
Oardc 
Booster, Ohio 44691 

DESCRIPTIONS - Observations of freguencies of occurrence 
are used to estimate parameters of the' negative binomial 
distribution. Parameters K, P, and Q are estimated and 
expected frequencies calculated. The program is a 
modification of 06.0.117 an improved estimation routine 
and relaxed input format. Storage used is approximately 
22,000 positions. Equipment required by program- 14K 
memory, 1622 card system. Automatic Divide, Indirect 
Addressing. Program can be run on lesser machine by 
rewriting input format and redimensioning. It is programmed 
as a mainline program in PDQ FORTRAN with DOHCOM 
subroutines. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060248 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-06.0.249 

SEVERAL GROUP DISCRIMIN£1!I ANALYSIS 

AUTHOR: J.O. Church, III 

DIRECT TECHNICAL INQUIRIES TO: 
J.O. Church, III 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

Lawrence University 
Appleton, Wise. 

DESCRIPTION - The ordinary problem that arises in 
discriainant analysis most often invloves more than 2 
groups. The programs available for the 1620 handle only 
the 2 group problem. This program modelled after the Bimed 
several Group Discriminant Analysis Program is capable 
of handling up to 15 groups as presently compiled. The 
program output consists of the variance-covariance matrix 
for each group, the dispersion matrix along with its 
inverse, the matrix of means, the discriminant functions, 
the evaluation of the functions, and finally the 
classification matrix. The program is written in FORTRAN 
and it is possible to modify the source program to fit 
any 1620 configuration. To use the object program provided, 
a 1620 40K System with Auto-divide, Floating Point, HF, 
THF, TNS, and card input/output is reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060249 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM program Order Form. 



1620.306^0^250 *M 

TRANSFORMATIONS 22 CHECK AND INCREASE LINEARITY IN DATA 

AUTHOR: Mr. R.W. Meadows 

DIRECT TECHNICAL INQUIRIES TO: 
Br. R.W. Meadows 

Southwest Missouri State College 
Springfield, Missouri, 65802 

DESCRIPTION - Accepts data prepared for multiple correlation 
and regression analysis in an F10.4 format, dependent 
variable punched last. A least squares cubic polynomial 
is fitted to the relationship between the dependent and 
each of 1 to 22 independent variables. The cubic polynomial 
coefficients are punched and could be read into the 
transformation section of a multiple regression program. 
If the data are loaded again, the cubic polynomial plotbacks 
are computed for each independent variable. The transformed 
data can then be run in 1620-06. 043 — or in 06.0.057 if 
14 variables or fewer. Improved linearity usually results. 
Restriction: some roundoff errors if data dichotomized, 
especially if, in both ind and dep variables. 

All data should be checked for linearity and transformed 
if need te before being run in linear correlation and 
regression programs. Otherwise, no definite conclusion 
is possible. This program makes possible multiple 
curvilinear correlation and regression analysis by using 
transformed data in the highly developed linear methods. 
The program also serves to check on the linearity of data, 
for if little imporvement in correlations result, then 
one can be confident that the <non-cyclic) data were 
sufficiently linear to begin with. 

PROGRAMMING SYSTEMS - Written in FORTBAN. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model I card system, 
1443 Printer. Floating Point Hardware, Programmed in 
FORTRAN with Format, storage used- 19,700. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 



CONTINUED FROM PRIOR COLUMN 

MINIMUM SYSTEM REQUIREMENTS - 40K 1620 with Automatic 
Divide, Indirect Addressing, TNS, TNF, MF. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620060251 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20-06 i 0.253 

PORTA - A GRADING PROGRAM 



AUTHOR: Mr. B. Northouse 

DIRECT TECHNICAL INQUIRIES TO: 
Mr. R. A. Northouse 
University of Wisconsin 
Milwaukee College of Applied Science 
Electrical Engineering 
Milwaukee, Wise. 53201 

DESCRIPTION - PORTA is a grading algorithm using "PORTA 
Punch" cards. Quizzes taken on these "PORTA Punch" cards 
are graded and a statistical evaluation made. 

PROGRAMMING SYSTEMS - PORTA is written in FORTRAN IID with 
Format and is a mainline program. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Mod II, 60K decimal 
digits (30 guestions, 195 students), (40K decimal digits) 
30 guestions, 100 students) card reader, 1443 Line Printer, 
1-1311 Disk File. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620060253 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.005 

SQUARE ROOT SUBROUTINE 

AUTHOR: Jon Petersen 

DIRECT TECHNICAL INQUIRIES TO: 
Jon Petersen 
computer Section 

Washington state Highway Department 
Transportation Building 
Olympia, Washington 

DESCRIPTION - Computes the square root of a number, say 
A, where A has an even number of decimals and is from two 
to twenty digits in length, storage 369 positions of core. 
No special features are required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070005 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



ORDERING INFORMATION: PROGRAM NUMBER 1620060250 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



J620302.JK006 

ARCTANGENT SUBROUTINE 



AUTHOR: 



Jon Petersen 



1620306^2^.251 

BATCH PROCESSING STEPWISE MULTIPLE LINEAR HEGRJSSIOH 

AUTHOR: Mr. K.L. Daniels 

DIRECT TECHNICAL INQUIRIES TO: 
Mr. K.L. Daniels 
North Dakota State University 
Fargo, n.d. 58101 

DESCRIPTION - A stpewise multiple linear regression program 
providing sums, means, sums of squares and cross products, 
standard deviation, deviation squares and cross products, 
correlations. In addition for each step it provides least 
squares regression eguation, standard error, T-test, R 
to the 2 power, F and Improvement F. A maximum of fifteen 
variables may be entered (14 independent and 1 dependent). 
The independent variables are entered in the best order 
unless otherwise specified. Data is normally in free form, 
however, any input form consistant with FORTRAN R, T, E, 
F, N and X Format can be specified at run time. Data may 
be run in batches without reloading the program. Extensive 
transformations in an easy to remember form are available. 
Output is on cards. Program can be used strictly as a 
correlation program by suppressing thre regression output. 

PROGRAMMING SYSTEMS - Written in Kingston FORTRAN II. 



DIRECT TECHNICAL INQUIRIES TO: 
Jon Petersen 
Computer Section 

Washington State Highway Department 
Transportation Building 
Olympia, Washington 

DESCRIPTION - Computes the arctangent of the quotient of 
two numbers, say A/B, where both A and B are from two to 
ten digits in length and have the same number of decimals. 
Storage 735 positions of core (711 if the MF special feature 
is used), no special features required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - Rone. 

ORDERING INFORMATION: PROGRAM NUHBER 1620072006 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



P01I»P»IAI; fJRVE FITTING USING LENGENDRE PCIYNOHIALS 

AUTHOR: Dr. Allan Malvick 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 



CONTINUED FROH PRIOR COLUMN 



DIRECT TECHNICAL IHQUIRIES TO: 
Dr. Allan Malvick 
Bepartment of Engineering Science 
University of Notre Dane 
Eox 1413 
Notre Dame, Indiana 

DESCRIPTION - The method used in this program gives a fit 
which follows (bumpy) curves better than a least sguares 
fit. Storage memory 25K, memory 40K. 



DIRECT TECHNICAL INQUIRIES TO: 
Dr. J. A. H. Lee 

The Commonwealth of Massachusetts 
University of Massachusetts 
Amherst, Hassachusetts 

DESCRIPTION - To compute the real & complex roots of 
polynomials of order not greater than 25. Constant term 
cannot be zero. Memory 20K, Automatic Divide 1620 tape 
system. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 

HACHINE READABLE - None. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
HACHINE READABLE - None. 



08DERING INFORMATION: PROGRAM NUMBER 1620070007 



ORDERING INFORMATION: PROGRAM NUMBER 1620076)014 



Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



Indicate n B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0^0.10 

BOUBLE PRECISION FLOATING POINT ARITHMETIC SUBROUTINES 

AUTHOR: Waldo J. Richards 

DIRECT TECHNICAL INQUIRIES TO: 
Waldo J. Richards 
Petti John Engineering Co., Inc. 
4115 H. E. Cully Boulevard 
Portland, Oregon 

DESCRIPTION - Sine and cosine are Maclaurin S series. 
Sguare root is Newton S Method. Arctangent is from 
(Mathematics of Computation, July, 1960) . The routines 
will work on any 1620. Storage addition. Subtraction, 
Multiplication and Division-00401 to 02057. Sine, cosine, 
sguare root, and arctangent - 02058 to 04099. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070010 

Indicate "B N 1 M in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.015 *g 

FORTRAN SYSTEM RELOCATABLE SUBROUTINE FOR GENERATING (RANDOM 
NUMBE RS) 

AUTHORS : H . Burns G. Dubay 

DIRECT TECHNICAL INQUIRIES TO: 
H. Burns 

Baylor University of Medicine 
Biomatematics Laboratory 
Houston, Texas 

DESCRIPTION - To permit the calling forth of a floating 
point (Random) number in the interval (0, 1.) by the FORTRAN 
statement X equals RND (ARG) the (Random) number X to be 
used in Monte Carlo type solutions. 



Memory 20K, 



PROGRAMMING SYSTEMS - Written in FORTRAN. 



MINIMUM SYSTEM REQUIREMENTS - 142 digits, 
and no other special features reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070015 



1620 z 07.0^012 

POLYNOMIAL REGRESSION PROGRAM 

AUTHOR: Otto Dykstra, Jr. 

DIRECT TECHNICAL INQUIRIES TO: 
Otto Dykstra, Jr. 
General Foods Research Center 
555 South Broadway 
Tarrytown, New York 

DESCRIPTION - This program determines by least sguares 
the coefficients of a polynomial. Data input format is 
very general. Output may include Residuals and Predictions. 
Memory 20K. 

BASIC PRCGRAM PACKAGE 

tOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070012 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^07^0^013 

£2iIB0MIAI ROOT SOLVER 

AUTHOR: Ronald Anderson 

DIRECT TECHNICAL INQUIRIES TO: 

Ronald Anderson 
Allen-Bradlay Company 
Department 810 
136 H. Greenfield Avenue 
Milwaukee 4, Wisconsin 

DESCRIPTION - Solve for all roots (real and/or complex) 
of a polynomial degree ten or less. The advantage of this 
program is - no guess is needed for any of the roots. 

Memory 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070013 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.017 

CALCULATION OF TBI SJAi MQ2S Qt h BEAL POLYNOMIAL EQUATION 

AUTHOR: Donald S. Miller 

DIRECT TECHNICAL INQUIRIES TO: 
Donald S. Miller 
Eastman Kodak Company 
Management Systems Development Dept. 
Applied Mathematics Section 
Rochester 4, New York 

DESCRIPTION - Will calculate all, or any lesser specificied 
number, of the real disscrete roots of polynomials of 
degree 2 to 29. Polynomials of common degree may be 
grouped, with 1 to 999 polynomials per group - For each 
group a single control card can specify constants and 
options common to all problems within the group. Memory 
20K - no other special features reguired. written in 
FORTRAN Language. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070017 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-37.0.018 

SINE/COSINE SUBROUTINE - FIXED POINT. 



author: J. schmalenberger 

DIRECT TECHNICAL INQUIRIES TO: 
J. Schmalenberger 
Pan American World Airways, Inc. 
Meteorological Data Reduction 
Building 800, Hail Unit 222 
Patrick AFB, Florida 

DESCRIPTION - Computes the natural sine or cosine of an 
angle. Either sine or cosine is computed depending on 
entry. Any 1620 system. No special features. This 
subroutine is written in 1620 SPS Language, Fixed point 
form, for assembly with the users program. It is completely 
relocatable. 



1620-07.0.214 

REAL AND COMPLEX ROOTS OF POLYNOMIAL 



Dr. J. A. N. Lee 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - None. 



CONTRIBUTED PBOGBAMS 
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ORDERING INFORMATION: PROGRAM NUMBER 1620070018 

Indicate "B H 1" in columns 1-3 and the Erogram Number 
in columns 4-13 on the IBM Program Order Form. 



1620 Z 0J.0^£19 

SJIIIzIMzQNE CUEVE F ITS HIPBBBCLIC. 
FUNCTIONS. 



EXPONENTIAL^ POWER 



AUTHOR: 



Norton 



DIRECT TECHNICAL INQUIRIES TO: 
E. J. Orth, Jr. 
Southern Services* Inc. 
P. O. Box 2641 
Birmingham, Alabama 

DESCRIPTION - This program, which is really three programs 
in one, computes the paraneters for theoretical curve fits 
to empirical data. Plot back, interpolation, standard 
error and function evaluation are each optional under CS 
control. Standard error feature permits comparison with 
polynomial fits done by program 07.0.002 and fits by other 
subprograms of this one. For function evaluation, 
paraneters are keyed-in at console typewriter. Card I/O, 
20K 1620 without special features. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
HACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070019 

Indicate "E H 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBM Program Order Forn. 



CONTINUED FBOM PBIOB COLUMN 

A. F. Hullaa 

Pirestone Tire $ Rubber company 

Akron 17, Ohio 

DESCRIPTION - Accepts ABCISSAE at equal or unequal spacing, 
and from 1 to 3 otdinates at each ABCISSA, calculates the 
La Grange co-efficients, and interpolates intermediate 
ordinate values. Has provision for dividing a range on 
the ABCISSA into intervals, and for a polynomial in each 
such interval of up to 20th power. Writeup explains how 
to change program to Hermit's, Gauss 1 , or other polynomial 
forms. Very complete write-up explains the reasons for 
each step of the program. 20K card I/O, FORTRAN with SAT. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE EEADAELE - None. 

OBDEBING INFOBMATIOH: PROGRAM NUMBER 1620070030 

indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBH Program Order Form. 



1620-0 7.0.0 32 

CALCULATION OF E.OOTS JEEAL AND COHPLEXJ. QF * M*k 
POLINOMIAL EQUATION 



AUTHOR: 



D. S. Miller 



NEWTONS DIVIDED DIFFERENTIAL 



1620^01.0^023 

lOLTNOHIAL CURVE FITTING 

FORMULA 

AUTHOR: I. D. Thompson 

DIRECT TECHNICAL INQUIRIES TO: 
I. D. Thompson 
The Marquardt Corporation 
P. 0. Box 670 
ogden, Utah 

DESCRIPTION — To provide a convenient method of solving 
for all points (X, T coordinates) on a curve defined by 
the 3 to 15 original points without the necessity of solving 
for the eguation and its coefficients. An additional 
option is included on a sense switch for the intergration 
of the curve. 2252 positions, memory 20K, and no other 
special features reguired. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - Hone. 

OBDEBING INFORMATION: PBOGBAM NUMBER 1620070023 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620Z0J..J..J29 

CALCULATION OF ROOTS (REAL AND COMPLEX) CF COUPLES 
POLYNOMIALS EQUATION 



AUTHOR: 



S. Miller 



DIRECT TECHNICAL INQUIRIES TC: 
D. S. Miller 

Applied Mathematics Section 
Management Systems Development Dept. 
Eastman Kodak company 
Rochester 4, New York 



DESCRIPTION - will calculate all, or any lesser specified 
number of roots (real or complex) of complex polynomials 
of degree 2 to 19. Complex polynomials of common degree 
may be grouped, with 1 to 999 polynomials per group; for 
each group a single control card can specify constants 
and options common to all problems within the group. 
Memory 20K; no other special features reguired. 

BASIC. PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

HACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NOMBEB 1620070029 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
D. S. Miller 

Applied Mathematics Section 
Hgnt. Systems Development Dept. 
Eastman Kodak Co. 
Rochester4, Hew York 

DESCRIPTION - Will calculate all, or any lesser specified 
number of roots (real or complex) of real polynomials of 
degree 2 to 19. Real polynomials of common degree may 
be grouped, with 1 to 999 polynomials per group - for each 
group a single control card can specify constants and 
options common to all problems within the group. All 
calculations are subject to the laws of rounding error 
and the precision defined by the FORTRAN system. Very 
close roots of a real polynomial eguation nay not be 
handled. For complex roots the initial approximation used 
in Newtons Method should probably be more carefully selected 
than in the case of real roots. Also, in most of the cases 
studied, it seemed advisable to use an initial approximation 
with non-zero imaginary part. Memory 20K - no other special 
features reguired. Written in FOBTBAN Language. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620072032 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.033 

CALCULATION OF THE REAL ROOTS OF A REAL HON = LINEAB EQUATION 
IN ONE VARIABLE 

AUTHOR: D. S. Miller 

DIRECT TECHNICAL INQUIRIES TO: 
D. S. Miller 

Applied Mathematics Section 
Hgmt. Systems Development 
Eastman Kodak Co. 
Rochester 4, New York 

DESCRIPTION - Will calculate a specified number of real 
roots of each of N non-linear eguations F (X, A sub 1J, 
A sub 23,,.., A sub MJ,) equals 0,(1 - J - N) in the single 
variable X, where the real coefficients A sub U, A sub 
2J,..., A sub MJ, the associated initial approximations 
and other options are defined in an ordered set of control 
cards. All calculations are subject to the laws of rounding 
error and the precisions of the FORTRAN System. Very close 
roots in all probability may not be approximated. Complex 
roots may not be handled. Inaccurate initial approximations 
may result in divergence or convergence to the wrong root. 
Memory 20K or 40K, no other special features required. 
Written in FORTRAN Language. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070033 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Forn. 



1620^07.0^030 

L1GRANCE IN TERPO LATION - H20 



AUTHOR: A. F. Hallam 

CIBECT TECHNICAL INQUIRIES TO: 



1620-07.0.034 

DIFFERENTIATION OF AN EMPIRICAL FUNCTION 



A. M. Pratt 



DIRECT TECHNICAL INQUIRIES TO: 
A. M. Pratt 



CONTRIBUTED PROGRAMS 
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Computer Center 
University of California 
Davis, California 

DESCRIPTION - This program differentiates an empirical 
function defined by equidistant observations and gives 
a good approximation for functions in which five consecutive 
points say be assumed to lie approximately on a parabola 
of second order. Memory 20K, Automatic Divide, Indirect 
Addressing, and card reader, card punch. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOBHATION: PBOGRAH NUMBER 1620070034 

Indicate "B N 1 M in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.041 

C ALCULATION OF THE SEAL BOOTS OF A SYSTEM OF K REAL NON- 
LINEAR IN K VARIABLES LINEAR EQUATIONS 



AUTHOR: 



S. Miller 



DIRECT TECHNICAL INQUIRIES TO: 
D. S. Miller 

Applied Mathematics Section 
Hgmt. Systems Development Dept. 
Eastman Kodak Co. 
Rochester 4, N. T. 

DESCRIPTION - Hill calculate a specified number of real 
roots of each of n systems of K real non- linear equations 
in K real variables. The associated initial approximation 
vectors and other options are defined in an ordered set 
of control cards. No special features are required. This 
program was written in FORTRAN Language. 



1620 = jn i 0_.036 

BOOTS OF POLYNOMIAL EQUATION 



AUTHOR: 



H. Owens 



DIRECT TECHNICAL INQUIRIES TO: 
R. H. Owens 

National Science Foundation 
Washington 25, D. C. 

DESCRIPTION - To calculate roots (real or complex) of a 
polynomial equation of degree N with real or complex 
coefficients. The program uses Mullers method of solution 
for algeb. equa. Memory 40K, cards, and no other special 
features required. Program written in FORTRAN without 
Format. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070036 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-07.0.037 

BESSEL FUNCTION SUBROUTINES IPJ FORTRAN WITH FORMAT, 
Ull JCr 1620-FO-037 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070041 

Indicate "B N 1 n in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^07^042 

CALCULATION OF THE CHARACTERISTIC POLYNOMIAL OF A REAL 
SQ.UARE MATRIX 



AUTHOR: 



S. Miller 



DIRECT TECHNICAL INQUIRIES TO: 
D. S. Miller 

Applied Mathematics Section 
Mgmt. Systems Development Dept. 
Eastman Kodak Co. 
Rochester 4, New York 

DESCRIPTION - Hill calculate the characteristic polynomial 
of an n x n real matrix where (a) For a 20K 1620 
installation, N can vary from 1 to 12 inclusive and (b) 
For a 40K-1620 installation, N can vary from 1 to at least 
20. This program was written in FORTRAN Language. 

BASIC PBOGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE BEADABLE - None. 



AUTHOR: H. E. Sundvall 



ORDERING INFORMATION: PROGRAM NUMBER 1620070042 



DIBECT TECHNICAL INQUIRIES TO: 
H. E. Sundvall 

General Nuclear Engineering Corp. 
Dunedin , Plorida 



Indicate n B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



DESCRIPTION - In the nuclear reactor field there is frequent 
necessity to make calculations involving the low order 
Bessel functions. To reduce the programming job to a 
minimum in this area, these eight low order Bessel function 
subroutines have been incorporated into the FORTRAN system 
at General Nuclear. These subroutines were written for 
a 20K Paper Tape System with Automatic Divide. No other 
special features are reguired. with miner modifications 
they can be easily adapted to a 40K or 60K machine. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFOBHATION: PBOGRAH NUMBER 1620070037 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620^07^0^.038 

RELOCATABLE COS^ SIN AND EXP SUBROUTINES FORTBAN II 



AUTHOR: 



E. Ackerman 



1620-07.0.043 

NUMERICAL CALCULATIONS OF THE DEFINITE INTEGRAL OF A HEAI 
F UNCT ION USING SIMPSONS RULE 

AUTHOR: Donald S. Miller 

DIRECT TECHNICAL INQUIRIES TO: 
Donald S. Miller 
Applied Mathematics section 
Management Systems Development Department 
Eastman Kodak Company 
Rochester 4, New York 

DESCRIPTION - This program will tabulate using Simpson's 
Rule, a preassigned number of definite integrals. Simpson's 
Rule is used for approximately all definite integrals. 
See Numerical Mathematical Analysis, third edition, by 
J. B. Scarborough, the Johns Hopkins Press, page 132, 
section 46 and page 174, section 57, (C) . All calculations 
are subject to the laws of rounding error and the precision 
of the FORTRAN system. This program was written in FORTRAN. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - None. 



DIBECT TECHNICAL INQUIRIES TO: 
J. White 

Mayo Clinic Computer Facility 
Rochester, Minnesota 

DESCRIPTION - Replacement for IBH library subroutines in 
FCBTRAN II Automatic Floating Point deck. Computation 
time is reduced by about 40 percent for COS and SIN and 
20 percent for EXP. storage requirements - Constants use 
locations 10500 - 11254. COS/SIN subroutine uses 912 
positions - EXP subroutines uses 1144 positions. Equipment 
specifications - same as for FORTRAN II with Automatic 
Floating Point subroutines. 

BASIC PBOGRAH PACKAGE 

COCUMEHTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070038 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



ORDERING INFORMATION: PROGRAM NUMBER 1620070043 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.045 

EXTREME-POINT SOLUTIONS FOR RECTANGULAR GAMES 



AUTHOR: Richard E. Hammer 

DIBECT TECHNICAL INQUIBIES TO: 
Bichard E. Hammer 
Case Institute of Technology 
Cleveland 6, Ohio 

DESCRIPTION - This program finds the value of a rectangular 
game and all extreoum points in the set of solutions of 
the game. Method - Examination of all sub-matrices. see 
chapter 3 of McKinsey, Introduction to the Theory of Games, 
for full details. Restriction/Range - where the game 
matrix is H by N, storage - 20,000 Positions. Equipment 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

required - TNS, TNF, HF, Auto Divide, Indirect Addressing, 
Floating Point hardware. Requirements easily removed - 
TNS, TUP, HF, Auto Divide, Indirect Addressing, Floating 
Point. Programming language is AFIT FORTRAN. The program 
was compiled using an AFIT Processor that had been modified 
to take advantage of the above optional features. If 
conpiled in non-modified AFIT FORTRAN, this program occupies 
approximately 22,400 positions. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - Hone. 

ORDERING INFORMATION: PEOGEAH NUMBER 1620070045 

Indicate "E N 1 H in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620-07. 0.046 

APPROXIMATE RECTANGOL AR GAME SOLUTION 



AOTHOB: Richard E. 



Hammer 



DIBECT TECHNICAL INQUIRIES TO: 
Bichard E. Hammer 
Case Institute of TECHNOLOGY 
Cleveland 6, Ohio 

This program, through an iterative technique described 
fully in chapter 4 of HcKinsey. (Introduction to the 
Theory of Games) finds bounds on the value of a rectangular 
game and approximations to a pair of optimal strategies 
for the game. Method - a two-player competitive situation 
is set up in the machine, and the game is played, with 
each player basing his moves on his opponent's past moves. 
Eguipment required by program - Cara system, TNS, TNF, 
HF, Auto Divide, Indirect Addressing, Floating Point 
hardware and 19,500 positions of core. By the restricting 
of the range somewhat more and compiling in standard AFIT 
FORTRAN, the. program can be easily changed to reguire only 
a 20K card system. Other programming language - AFIT 
FORTRAN. The program was compiled using an AFIT FORTRAN 
Processor modified to take advantage of the above checked 
optional features. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
HACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620070046 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^07^0^047 

CjJlEYCJEV ICONCMIZATIpN CF POLYNOMIALS 



CONTINUED FROM PEIOB COLUMN 

400 North wolf Road 
Norhlake, Illinois 

DESCRIPTION - This subroutine finds the gamma function 
of X of any argument X in the range less than X less 
than 70.27, and within a relative error of less than one 
times ten to the minus seven. Arguments X outside above 
range are not considered as valid, and an error message 
is printed according to whether C equal to cr greater than 
70.27 or X equal to or less than 0.0. Storage used by 
subroutine is 875 digit locations. Equipment 
specifications: Card system. Auto Divide, Indirect 
Addressing, memory 20K. The subroutine can be used in 
other machines, since the Auto Divide, Indirect Addressing 
and memory requirements are fairly easy to remove. 
Programming type: FORTRAN with Format subroutines or 
function subprogram (S or F) . The program is a library 
(I.E., SPSJ function to the FORTRAN system checked SPS 
- 1620/1710. Language used in the write-up is SPS- 
1620/1710. The subroutine has been tested thoroughly, 
and its accuracy has been determined by means of an SPS 
program-subroutine, written by the author, and which 
calculates gamma values to an accuracy of as many as 43 
digits. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORHATION: PROGRAM NUMBER 1620070048 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-0 7.0.049 

ALGEBRAIC SOLUTION FO GENERAL BEAL O.UAR.TIC POLYNOMIAL 



AUTHOR: 



Randolph G. Smith 



AUTHOR: 



Robert A. Brown 



DIRECT TECHNICAL INQUIRIES TO: 
Robert A. Brown 
Carleton college 
Horthfield, Minn. 

DESCBIPTION - This program reads the coefficients of a 
polynomials and computes coefficient's of a polynomial of 
such a degree that it approximates the first to a given 
precision en a given interval or it equals a given degree. 
The program will handle degree up to 175 and carries twelve 
digit mantissas on coefficients and range. It will also, 
on a switch option, develop an error table consisting of 
the values of P(C), the original Polynomial, G (X) , the 
economized polynomial, and their difference for each X 
in a specified range in increments also specified by the 
user. Method - By a linear change of variable, the interval 
of approximation is transformed to (-1*1) and the method 
of economization by use of Chebychev Polynomials is then 
used. Restriction/Range - The program will handle any 
polynomial of degree not over 175 over any finite range 
as long as N to the D power less then 10 to the 99th power 
where D is the degree of the input polynomial and N the 
length of the interval. Eguipment required - Card system, 
TNS, TNF, MF, Auto Divide, Indirect Addressing, Floating 
Point hardware and storage positions 00402-19773. 
Programming type - 1620/1710 SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up o,n Microfiche only. 
HACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070047 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
Randolph G. Smith 
Scientific Computing Ctr. 

BOX 8011 

University of Miami 
Coral Gables, Fla. 

DESCRIPTION - The program obtains all solutions of a general 
real polynomial of degree one, two, three, or four by 
algebraic methods. The methods used are cardans solution 
of the cubic equation and must all be real. At least one 
of the coefficients must be Ferraris solution of the quartic 
equation. The coefficients non-zero for solutions to be 
found. A 40K 1620 card system with Auto Divide and Indirect 
Addressing is required. The language used is FORTRAN II. 
Compiled in FOBTBAN II with 28 digit precision maximum 
time for guartic solution is about 50 seconds. Program 
automatically reinitializes for next quartic after solution 
is obtained. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADAELE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070049 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



F^ATIHG COMPARE SUBROUTINE FOR SPS 

AUTHOR: Richard L. Pratt 

DIBECT TECHNICAL INQUIRIES TO: 
Richard L- Pratt 
Senior Computer Programmer 
Data Corporation 
7500 Old Xenia Pike 
Dayton, Ohio 45432 

This is a Macro-Op and subroutine for comparing two numbers 
in the standard foloating point format. It is used just 
as an ordinary compare instruction is used with fixed point 
numbers. Method - The floating subtract routine is used, 
but the answer is not stored. Specifications - Storage 
is 20K or up. Equipment: Card system, no optional features 
required. Programmed in SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - None. 

ORDERING INFORHATION: PROGRAM NUMBER 1620070050 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



:t620z.0J..0,.J48 

FORTRAN WITH FORMAT GAMMA FUNCTION SUBROUTINE-POSITIVE 
AEGOMJNTS 

AUTHOR: Berberto Pachon 

DIRECT TECHNICAL INQUIRIES TO: 
Berberto Pachon 
Automatic Electric Laboratories, Inc. 



1620-07.0.051 

1ICSINE SUBEOUTINE (RELOCATABLE!. 



Miss K. Kornafel 



DIRECT TECHNICAL INQUIHIES TOx 
Miss K. Kornafel 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PBIOB PAGE 

Bureau of Public Roads 
Boon 109, Building 40 
Denver Federal Center 
Denver 25, Colo. 

DESCBIPTIOB - A relocatable subroutine for the arcsine 
of a ten digit number (one integer plus nine decimals) , 
representing the sine of an angle. Mathematical Method: 
A rational approximation given by the Band Corporations 
(approximations in numerical analysis) . Restrictions - 
The range of X handled by this approximation is equals 
X equals 1 the results are accurate to 8 or - 1 in the 
ninth decimal. (The subroutine totally includes and makes 
use of a relocatable subroutine for sguare root) storage. 
Requirements - 1113 positions. Equipment specif ications: 
Automatic Divide, Indirect Addressing, other special 
features required - HE. Programmed in Fixed Point 1620 
SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - Hone. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070051 

Indicate "B H 1" in columns 1-3 and the Program Dumber 
in columns 4-13 on the IBB Program Order Form. 



1620-07^0^53 

IliOCAUBlE SUBROUTINES ABS. DEF . PLOT, HBIT 

AUTHOBS: Ralph Brandt Lawrence Brown 

DIRECT TECHNICAL INQUIRIES TO: 
F. B. Cannon 
Registrar 

Shippensburq State College 
Shippensburg, Pehna. 

DESCRIPTION - The added subroutine must be retained in 
the order specified in the title. The ABS subroutine takes 
the absolute value of the variable by clearing the flag 
in FAC-3. DEF defines the character to be plotted with 
by placing the defined constant in 8000. The plot causes 
any number of variables to be plotted using the character 
places in 8000. If no plotting character is defined the 
plus sign(+) is used. Error messages are included in this 
subroutine. The WRIT subroutine prompts the use of an 
output device for the final plot, and places the variable 
on the left of the plot in a 11 format. If this is 
impossible the word, over, is printed. Storage used by 
program - 1322 positions. Equipment required by program: 
Card system, TNS, TNF, MF, Auto Divide. Programming type 
- FORTRAN with Format, subroutine; program is a library 
function to the FOBTRAS system checked. Processed using 
the 1620/1710 SPS. The error messages include error FN 

(variable is negative) , error FE (exponent to large to 
plot) , and error FF (100 greater than variable greater 
than 73) . The output devices are controlled by switches 
2 and 3, and are used as follows - 2 off, 3 off (Punch 
ana Typewriter) 2 on, 3 off (Punch), 2 off, 3 on 

(Typewriter) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
HACHINE READABLE - Rone. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070053 

Indicate "E 8 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07..0..055 

POLYNOMIAL GENERATION AND INTERPOLATION WITH DERIVATIVES 
BY NEWTONS F.I.M. 



AUTHOR: 



Mr. A. 



Housman 



CONTINUED FROM PRIOR COLUMN 

in columns 4-13 on the IBM Program Order Form. 



1620-07.0.056 

FOaRIER ANALYSIS z 1^0 OR THREE PASS SYSTEM 

AUTHOR: John E. Bieber 

DIBECT TECHNICAL INQUIRIES TO: 

Stanley wooten. Code 1-65 

0. S. Naval Civil Engineering Laboratory 

Port Hueneme, California 



DESCRIPTION - This program computes a specified number 
of terms of the Fourier Series of a given function, output 
consists of a set of Fourier sine and cosine coefficients, 
a corresponding list of pure sine amplitudes and phases, 
and a tabulation and graphical plot of the input function 
and its Fourier approximation. This is a modification 
of the program (Fourier Curve Fitting) by A. F. Zettlemoyei 
and C. W. Bowman (7.0.031) with the following improvements: 
An option for a special type of input designed for use 
in analyzing electrical power systems, a graphical plot 
of the output, a slightly more efficient and more readable 
source program. 

Bestrictions/range- Source program requires a plot 
subroutine (Users Group No. 6.0.119, as modified by NCEL) , 
and a PDQ compiler (Ho. 2.0.031), but these requirements 
can easily be eliminated. Up to 50 terms of the Fourier 
Series can be computed. Up to 104 points of the function 
can be input or output. Four program decks are required. 

Storage Requirements- Each pass requires approximately 
20K storage. 

PROGRAMMING SYSTEMS - FORTRAN, Floating Point, Non- 
Relocatable. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, Automatic Divide, 
Indirect Addressing. Card R/P unit. 

BASIC PR0GBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070056 

Indicate "B N 1" in columns 1-3 ana the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.058 

CONIC EQUATIONS PROGRAM 



AUTHOR: 



David L. Jensen 



DIRECT TECHNICAL INQUIRIES TO: 
Mr. A. C. Housman 
Royal McBee Corporation 
1031 New Britain Avenue 
West Hartford, Conn. 

DESCRIPTION - Given a set of "N" data points the program 
uses a divided difference table to evaluate an N-1 order 
polynomial through the points at any specified interval 
over any range within the range of the data points and 
evaluates all derivatives desired at the points. Any 
derivative may be forced to any desired value at any point. 
The program also gives the coefficients at the interpolating 
polynomial, and thus may be used as a curve fitting routine, 
storage used by program- 44,250. 

MINIMUM SYSTEM REQUIREMENTS - Card system, TNS, TNF, MF, 
Auto Divide, Indirect Addressing. 

PROGRAMMING SYSTEMS - FORTRAN II, mainline, complete. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGRAM NUMBER 1620070055 

Indicate "B N 1" in columns 1-3 and the Program Number 



DIRECT TECHNICAL INQUIRIES TO: 
David L. Jensen 
Computer Center 
Utah State University 
Logan, Utah 84321 

DESCRIPTION - Classifies an equation as a circle, ellipse, 
parabola, hyperbola, one straight line, two parallel lines, 
two intersecting lines, or a point on either the real or 
imaginary plane. Depending on a control digit particulars 
such as the coordinates of foci, vertices, centers, the 
eccentricity, latus rectum, area, circumference, radius, 
length of major and minor axes, length of conjugate and 
transverse axes, eguations of directrices, slopes, X and 
Y intercepts, etc. may be computed. Batch processing of 
data for more than one equation is allowed. Axis rotation 
may occur to remove any XY coefficient. All data is assume 
to be in relation to the S-Y coordinate system. Output 
is on punched cards. All output is clearly labeled. 
Subroutine GDBTC is included with the main program. 

PROGRAMMING SYSTEMS - Written for the IBM FORTRAN II 
compiler but can be readily modified for other FORTRAN 
compilers which will adapt to a 40K CPU, such as PDQ ana 
UTO FORTRAN systems. I/O must be under FORMAT control. 

MINIMUM SYSTEM REQUIREMENTS - 40K 1620 card system. 

BASIC PROGRAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070058 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.060 

BINOMIAL COEFFICIENTS 



AUTHOR: Mr. D. L. Wright 

DIRECT TECHNICAL INQUIRIES TO: 

Rr. D. L. Wright 
Georgetown University 
Computation Center 
Washington, D. C. 20007 



COHTBIBUTED PROGRAHS 



CONTINUED FBOH PBIOB PAGE 

DESCRIPTION - The BS1 coefficients of the binomial expansion 
of (P&Q)**B are calculated where P and N are given as 
input, and Q is either given as input also, oc is calculated 
as 1-P. If Q is calculated as 1-P, then P Bust be less 
than or equal to 1. 

PROGRAMMING SYSTEMS - Programed in FORTRAN II-D. 

HIHIHOH SYSTEM REQDIHEHENTS - 01316 positions of storage 
and a card system. 

BASIC PROGBAH PACKAGE 

DOCUHEHTATION - Brite-up on Microfiche only. 
MACHINE READABLE - Bone. 

OBDEBIBG INFORMATION: PBOGBAH NUMBER 1622070060 

Indicate "E B 1" in columns 1-3 and the Prograa Number 
in coluans 4-13 on the IBB Progran Order Form. 



1620rfl?.0.g62 

GAMMA EUNCTION S0BB0DTI8E FOB BDO, FORTRAN 



AOTHOB: 



Hartsock, Jr. 



DIBECT TECHHICAL INQUIRIES TO: 
*. F. Hartsock, Jr. 
Operations Besearch Group 
Edgewood Arsenal, Maryland 21010 

DBSCBIPTIOB - The subroutine is designed as an addition 
to the 1620 Card PDQ FOETEAH subroutines (Fixed and Free 
Format) with Autoaatic Divide. It computes the gamma 
function when called for by naae in a PDC FOBTBAH source 
program. The subroutine computes the gamma function by 
a Bastings approximation and the error in accuracy should 
be no greater than two in the seventh digit of the mantissa. 

PBOGBAHHIBG STSTEHS - Programmed in SPS code 1620-SP-020 
deck Bo. 1. This subroutine is to be used in conjunction 
with PDQ FOBTBAB and mast be added as specified in the 
PDO. FOBTBAB write-up (02.0.031). 

HIHIHDH SYSTEH REQUIBEHENTS - Card system, Autoaatic Divide. 
It may be used on any machine using PDQ FOBTBAB. 580 digit 
of core. 

BASIC PBCGBAH PACKAGE 

documentation - write-up on Hicrofiche only. 

MACHINE BEADABIE - Bone. 

OBDEBIBG INFOBHATION: PBOGBAH BDHBEB 1620070062 

Indicate "E N 1" in columns 1-3 and the Prograa Number 
in columns 4-13 on the IBH Program order Form. 



1620-0?. 0.363 

ERROR UNCTION SOBBODTISE FOB PDC. FOETBAH 
JC AED1 



CONTINOED FBOH PBIOB COLUHN 

a minimum of trouble this program mas written to be included 
in the FOBTBAB II subroutine deck. Bandoa numbers are 
produced from either a rectangular or a standard normal 
distribution. A series of random numbers can be continued 
where each random number serves as the multiplicand for 
the next number. Be petit ion should not be expected for 
a series of 50 million numbers. All computations are done 
in fixed point. The results are translated into Floating 
Point notation, normalized, and placed in FAC (00476-85) 
for branching back to the calling program. Source prograa 
is in SPS II 618 core locations. 

Minimum System Requirements - A 1620 Hodel II Card System 
with Floating Point hardware, and 40K storage. Can be 
modified for other than 40K. The progran is a modification 
of 1620-07.0.021, "Random Number Subroutines for IBH 1620 
FOHTBAN w/Fornat". 

BASIC PBOGBAH PACKAGE 

DOCBHENTATIOB - Brite-up on Hicrofiche only. 
HACBIBE BEADABIE - None. 

OBDEBIBG INFOBHATICN: PBOGBAH BDHBEB 1620070064 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620^07^0^065 

IICTOR COMPOSITION AND DECO MPOSITION 



AUTHOR: 



J. J. Belihan, Jr. 



DIRECT TECHNICAL INQUIBIES TO: 

J. J. Belihan, Jr., Hatheaatical Branch, ETOBS-2 
Air Force Systems Command 
Patrick AFB, Fla. 32925 

DESCRIPTION - Program adds any number of vectors in two 
or three dimensions, expressing the resultant in magnitude 
and direction(s) or orthogonal components, X, Y, Z. Program 
resolves each vector into its orthogonal components adds 
respective components, and forms resultant vector and 
direction (s) from these. Storage used - 13,104 positions. 

Equipment required - 1620 card system with Auto Divide. 
Program can be used on machine without Auto Divide. 



2.0.031 Format Fortran 



ADTHOE: 



F. Hartsock, Jr. 



Programming language is PDQ FORTRAN, 
with free form input. 

BASIC PBOGBAH PACKAGE 

D0CDHE8TATI0N - Write-up on Microfiche only. 
MACHINE BEADABIE - None. 

OBDEBIBG INFORMATION: PROGBAM HUHBER 1620007065 

Indicate "B N 1" in columns 1-3 and the Program Number 
in coluans 4-13 on the IBM Program Order Form. 



1620-07.0.067 

RANGE AND BEARING 



DIRECT TECBNICAL INQUIRIES TO: 
?. F. Hartsock, Jr. 
Operations Besearch Group 
Edgewood Arsenal, Maryland 21010 

DESCBIPTIOH - The subroutine is designed as an addition 
to the 1620 card PDQ FORTRAN subroutines (Fixed and Free 
Foraat) with Automatic Divide. It computes the error 
function when called for by name in a PDC FOBTBAN source 
program. The subroutine computes the error function by 
a Hastings approximation and the error in accuracy should 
be no greater than three in the seventh digit of the 
mantissa. 

Equipment required by program- Card system; Automatic 
Divide. It may be used on any machine using PDQ FORTRAN. 
478 digits of core. Programmed in SPS Code 1620-SP-020 
deck No. 1. This subroutine is to be used in conjunction 
with PDQ FOBTBAN and must be added as specified in the 
PDQ FOBTBAN write-up (02.0.031). 

BASIC PBCGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

O&DEBING INFORMATION: PBOGBAH NUMBEB 1620070063 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Progran Order Form. 



ADTHOE: 



J. J. Relihan, Jr. 



DIRECT TECHNICAL INQUIRIES TO: 
J. J. Belihan, Jr., 
Hathematical Branch, ETOBS 
Air Force systems Command 
Patrick AFB, Fla. 32925 



DESCRIPTION - Program computes the range and bearing between 
two given points on the surface of the earth. Each point 
is expressed in geodetic latitude and longitude. The first 
point aust be west of the second point; the bearing is 
taken from the first point. Bearings are calculated from 
to 180 degrees. Storage used - 17,196 positions. 



Equipment required - Card system with Auto Divide, 
can be used on machine without Auto Divide. 



Progran 



Programming language is PDQ FOBTBAN, 2.0.031 Format FOBTBAN 
with free forn input. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NDHBEB 1620070067 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



J620 = 01..0.e64 

Eil!I>CH NDJBEB S0BBO0TINE f OR J620 FOBTBAN II 

AUTHOR: Nina Thomas 

DIBECT TECHNICAL INQUIRIES TO: 
Nina Thomas 
General Electric Co. 
600 Main Street 
Johnson City, New York 

DESCRIPTION - In order to generate random numbers with 



!620 z 01i0i.06_8 

HELHERTS DIRECT GEODETIC PROBLEM 



AUTHOR: 



J. J. Belihan, Jr. 



DIBECT TECHNICAL INQDIBIES TO: 
J. J. Belihan, Jr., 
Hathematical Branch, ETORS-2 
Air Force Systems command 
Patrick AFB, Fla. 32925 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

DESCRIPTION _ Program computes the geodetic co-ordinates 
of a point on the surface of the earth, given the distance 
and bearing from another known point. Program uses 
Helmert's solution. The point calculated must be east 
of the given point. Bearing from true North, from to 
180 degrees. Storage used - It, 482 positions. 

Equipment required - 1620 card system with Auto Divide. 
Program can be used on machine without Auto Divide. 

Programming language is PDG FOBTHAN, 2.0.031 Format FORTRAN 
with free form input. This program may be used to verify 
the calculations of the range and bearing program. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070068 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-0J..J_..g69 

GEODESIC POINTS 



AUTHOR: 



J. J. Relihan, Jr. 



DIRECT TECHNICAL INQUIRIES TO: 
J. J. Relihan, Jr. 
Mathematical Branch, ET0R5-2 
Air Force Systems Command 
Patrick AFB, Fla. 32925 

DESCRIPTION - Program computes the geodetic latitude and 
longitude of points along a geodesic at given intervals 
up to a maximum range from a given origin, approximately, 
it computes points on a Great circle. Program uses Helaerts 
solution. Bearing from true North, from to 180 degrees. 
Storage used - 1*1,736 positions. 

Eguipment reguired - Card system with Auto Divide. Program 
can be used on machine without Auto Divide. Programming 
language is PDQ FORTRAN, 2.0.031 Format FORTRAN with free 
form input. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMEER 1620070069 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



CONTINUED FROM PRIOR COLUMN 

multiplicity. The roots of each of the sub-pclynomials 
can then be determined by standard techniques. The method 
is based upon Euclid's algorithm for determining the 
greatest common factor between two polynomials. The program 
is restricted to polynomials with real coefficients and 
degree 19 or less. Storage used - 30850 locations. 

Eguipment required - Card system with Floating Point 

hardware. 

Written in FORTRAN II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070073 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-07.0.075 

LEAST SQUARES FIT OF RESPONSE CURVES TO FIRST ORDER LAG BITB 
9.1 «IIHOUT DEAD TIME 

AUTHORS: Cecil L. Smith Paul B. Murrill 

DIRECT TECHNICAL INQUIRIES TO: 
Cecil L. smith 
Chemical Engineering Dept. 
Louisiana State University 
Baton Rouge, La. 

DESCRIPTION - This program approximates the response curves 
commonly encountered in control work by either (1) a pure 
first order lag with a variable or specified initial point, 
or (2) a first order lag plus pure time delay. However, 
the program is not restricted to response curves. The 
best fit is determined in the least squares sense. 



Memory of 40K, Automatic Divide, 



Equipment specifications 
and Indirect Addressing. 

The program is written in FORTRAN II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUHBER 1620070075 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^07. 0^071 

RJfaDF - A FUNCTIONAL SUBROUTINE TO GENERATE RANDOM NUMBERS 
FOR THE MONITOR I SYSTEM 

AUTHOR: Robert H. Jackson 

DIRECT TECHNICAL INQUIRIES TO: 
Robert M. Jackson 
Louisiana Tech. Computing center 
Louisiana Polytechnic Institute 
Huston, Louisiana 71271 

DESCRIPTION - To generate a random number of a specified 
length (dictated by the argement) . The mathematical method 
is an extension of Lehmers Rule. Storage requirements 
are 728 digits. 



1620-07.0.076 *M 

FORTRAN II-D SUBROUTINE FOR MATRIX INVERSION AND/OR RELATED 
OPERATIONS 



Eguipment specifications 
Addressing. 



1620 with card I/O and Indirect 



Source language 

1620-Model I. 



SPS II-D; relocatable. Assembled on 



BASIC FROGRAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDEBING INFORMATION: PROGRAH NUMBER 1620070071 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



AUTHOR: 



L. B. Barker 



DIRECT TECHNICAL INQUIRIES TO: 
c. L. R. Barker 
M. E. Dept. 

Arlington State College 
Arlington, Texas 76010 

DESCRIPTION - May be used for inversion of a matrix, solving 
simultaneous linear equations, evaluating a determinant, 
finding the rank of a matrix, or any meaningful combination 
of these operations. Gauss-Jordan reduction with columnar 
pivoting. Number of rows in the matrix must not exceed 
62. Storage used by program is 3946 digits. 

PROGRAMMING SYSTEMS - Britten in SPS II-D. 

MINIMUS SYSTEM REQUIREMENTS - The equipment reguired by 
program is a 1620 card system with disk file, 1 drive, 
TNS, TNF, MF, Auto Divide, Indirect Addressing and Floating 
Point hardware. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 162007076, 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-0J.0^J73 

PEOGRAH TO DETERMINE AND REMOVE MULTIPLE ROOTS FROM 

POLYNOMIALS 



Eugene Peck 



AUTHORS: Besley Blood 
J. P. Biley 

DIRECT TECHNICAL INQUIRIES TC: 
Besley Blood 
Utah Bater Research Lab. 
Utah State University 
Logan, Utah 

DESCRIPTION - This computer program tests whether multiple 
roots, real and imaginary, exist in a polynomial. Bhen 
such roots exist the given polynomial is factored into 
a series of sub-polynomials each of which contains no 



J620 = 0_l = .0 i 077 

h VARIABLE PRECISION SERIES APPROXIMATION TO THE. ERROR 
IPJCTIOJ! SUBROUTINE 



AUTHOR: 



Nark flilson 



DIRECT TECHNICAL INQUIBIES TO: 
E. Arthur Fiser 
Director, Computing center 
Miami University 
Oxford, Ohio 

DESCRIPTION - A power series, with coefficients derived 
from Hermite polynomials, is used to compute the error 
function of any argument with any precision desired, from 



CONTRIBUTED PROGRAMS 
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02 to 28 places. Error does not exceed 60-1 in the low- 
order digit. This is a library subroutine for 1620 FORTRAN 
II-D and Bust be added to the library as specified in C26- 
5739. It uses all the working areas of the FORTRAN 
subroutines. Equipment required by program - 1620 Model 
1 Card I/O j 1 Disk Pile; HP Into Divide; Indirect 
Addressing; Floating Point hardware; requirement which 
can be easily removed is HP instruction. Programmed in 
SPS II-D. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

CBDEBING INFORMATION: PBOGBAH NUMBER 1620070077 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns *•— 13 on the IBM Program Order Form. 



CONTINUED FROM PBIOB COLUMN 

short distances, i.e., less than about 10 NM, each point 
is expressed in Geodetic latitude and Longitude. Program 
uses the Gauss Hid Latitude Formula. Storage used by 
program paper tape system. Auto Divide. Program can be 
used on lesser machine. Auto Divide requirements can be 
removed. FORTBAN with Format. This program and those 
named below form a triolgy for geodetic distance and bearing 
computations (1) same author, the Be verse Geodetic Problem 
(2) same author. Direct Geodetic Problems. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 

MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620081003 



Indicate " 

in columns 



3 N 1" in columns 1-3 and the Prograi Number 
4-13 on the IBM Program Order Form. 



1620=01,0^078 



AUTHOR: 



Emin 



DIRECT TECHNICAL INQUIRIES TO: 
P. P. Emin 

University of New Brunswick Computing Center 
Fredericton, New Brunswick, Canada 

DESCRIPTION - DSAVE is an operating system which provides 
an Interrupt-and-Store facility for the 1620 Monitor System. 
The main program dsave resides in 1311 Disk Storage. The 
user program which is to be interrupted and stored on disk 
is stopped in manual and IB-1 and IR-2 are recorded. DSAVE 
is then called into memory. The operator via console 
typewriter, enters IR-1 and IB-2, the user progran is 
stored on disk, and DSAVE executes CALL EXIT. To restore 
the program to memory, DSAVE is executed as a Monitor job. 
Execution begins at part 2 which permits continuation of 
any program previously stored on disk. No attempt should 
be made to interrupt the Monitor I/O routine, system time, 
or execution of DUP or Loader. DSAVE is a package system 
consisting of (a) DSAVE - the main program. (b) LIBDIG 
- a mainline SPS Program to force loading of subroutine 
LDSAVE. 

Program requires a 20K 1620 with one disk file and Indirect 
Addressing. Programmed in SPS II-D. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOBMATION: PROGRAM NUMBER 1620070078 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620=08.^004 

DIRECT GEODETIC PROBLEM 

AUTHOR: James J. Relihan, Jr. 

DIRECT TECHNICAL INQUIRIES TO: 

J. J. Relihan, Jr. 

Mathematical Branch, ETORS-2 
Air Force Systems Command 
Patrick AFB, Florida 32925 

DESCRIPTION - Program computes geodetic co-ordinates of 
a point on the surface of the earth, given the distance 
and beaming from another known point. Program uses 
Helmer's Solution. The point calculated must be east of 
the given point. Bearings good from to 180 deg. storage 
used by program 15,962. Paper tape system. Auto Divide. 
Auto Divide requirements can be easily removed. FORTRAN 
with Format. This program and those named below form a 
trilogy for geodetic distance and bearing computations 
(1) sane author. The Reverse Geodetic Problem. (2) same 
author. The Reverse Geodetic Problem for Short Lines. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620081004 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20-0 8.1.005 

GENERAL RAY TRACE PROGRAM 



AOTHOR: 



H. Oherren 



1620=07..0.079 

RATIONAL APPROXIMATION PROGRAM 



AUTHOR: 



Struble 



DIRECT TECHNICAL INQUIRIES TO: 
G. Sturble 

Statistical Laboratory and Computing Center 
University of Oregon 
Eugene, Oregon 

DESCRIPTION - Generates rational function approximating 
a given function on an interval; both end-points are set 
by the user to finite or infinite values. Attempts to 
minimize maximum error (relative or absolute). User must 
supply subroutine which will provide value of function 
at any value in approximation interval. Convergence to 
good rational approximation cannot be guaranteed; 
convergence is enhanced by interactive control provided 
to the user by the program. 

Program requires a 40K card system with Auto Divide and 
Indirect Addressing. Programmed in FORTRAN II. 

BASIC EROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620070079 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
D. H. Oherren 
G. A. C. 
Litchfield Park, Ariz. 

DESCRIPTION - Program will trace rays through Optical Lens 
Systems which include cylindrical and/or conical surfaces. 
Surfaces must be describable by a second degree equation. 
Surfaces are described in a local coordinate system and 
positioned by the program in the optical system through 
translation and rotation of the local system. A sample 
Ray Trace problem is included, output includes X, Y, and 
Z coordinates and direction cosines on specified surfaces. 
Also calculates optical axis intersection of rays if any. 
Single ray input or ray fan input. Execution time depends 
upon machine available. 

PROGRAMMING SYSTEMS - Britten in FORTBAN with Format. 

MINIMUM SYSTEM REQUIREMENTS - Storage used by program - 
40K. Equipment required by program - Card system, TNS, 
TNF, MF, Auto Divide, Indirect Addressing, Floating Point 
hardware, assumes off-line 407 or equivalent. Program 
can be used on lesser machine. By recompiling, it can 
run on 40K machine without added features. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620081005 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



^620=08^.00^ 

REVERSE GEODETIC PROBLEM FOR SHORT LINES 

AUTHOR: James J. Relihan, Jr. 

DIRECT TECHNICAL INQUIRIES TO: 
J. J. Relihan, Jr. 
Mathematical Branch, ETORS-2 
Air Force Systems Command 
Patrick AFB, Florida 32925 

DESCRIPTION - Program computes the distance and bearing 
between two given points on the surface of the earth for 



1620-08.2. 



WHY A OHE=DIHENSIONAI FEH=GROUP DIFFUSION CODE FOE THE IEM 
162 



AUTHORS: 



H. Hunter R. A. Heffley 



DIRECT TECHNICAL INQUIRIES TO: 
Mrs. C. H. Hunter 
Knolls Atomic Power Laboratory 
Building E-6, Room 125 
Schenectady, New York 

DESCRIPTION - An approximate solution to the diffusion 



CONTRIBUTED PROGRAMS 



1620 



CONTINUED FROM PRIOR PAGE 

equation is obtained by applying a finite difference 
equation on a linear mesh for Slab, Cylindrical or Spherical 
Geometry. 00000-18620 are used in WHY, Version M. Memory 
20K» Automatic Divide, Indirect Addressing, and no other 
special features reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABIE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620082001 

Indicate "E N 1" in coluons 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTINUED FBOM PRIOR COLUMN 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620082010 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620^08^2.003 
MAIDS - A 
IBM J620 



MACROSCOPIC INPUT DIFFOSION SYSTEM FOB THE 



D. L. Ravanagh 
N. G. Gunther 



Ecjawa 
Temme 



CIBECT TECHNICAL INQUIRIES TO: 
Hiss Elaine K. Egawa 
Advanced Technology Laboratories 
369 Whitman Road 
Mountain View, California 

DESCRIPTION - To carry out four-group diffusion calculations 
on light water Moderated reactor systems. Includes many 
options for criticality searches, boundary conditions, 
output edits, etc. 40K, card input-output, and no other 
special features required. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PBOGBAH NUMBER 1620082003 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



!620 z 0JU2.e0lt 

SFEK/SPJIDY KATE 

AUTHOR: K. V. Cooper 

DIRECT TECHNICAL INQUIRIES TO: 

K. v. Cooper 

Knolls Atomic Power Laboratory 
ADA Advanced Experimental Physics 
Room 13, Building F 
Schenectady, New York 

DESCRIPTION - This program generates group constants 
averaged over a Wigner-Wilkins Spectrum from EV to .625 
EV. 19,397 locations memory 20K, Automatic Divide, Indirect 
Addressing, and punched card input and output. 

BASIC FBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620082004 



CALCULATION OF MINERAL UNIT CELL CONTENTS 

AUTHOB: B. J. Howarth 

DIRECT TECHNICAL INCUIRIES TO: 
R. J, Howarth 
Geology Dept. 
The University 
Bristol 8, England 

DESCRIPTION - Calculation of Unit Cell contents from 
chemical analysis data, recalculated on basis of 21 oxygen 
atoms into the form (SI,AL,FE3,TI) 8. (AL,FE3,FE2,TI,MG,MN) x. 
(NA,K,CA)y. (0,0H,F)24. Equipment Specifications- 1620 
with 20K S card I/O. No special features required. Atomic 
Rations in Unit Cell corrected to 0.01., Floating Point 
Arithmetic throughout. Written in FORTRAN. 

BASIC PROGRAH PACKAGE 

DOCUMENTATION ■- Write-up on Hicrof iche only. 
HACHINE READABLE - None. 

OBDEBING INFORHATION: PROGRAM NUMBER 1620083004 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620^08.3^005 

A PROGRAM TO INDEX CRYSTALS 



AUTHOR: 



Robert Greenblatt 



Indicate «! 
in columns 



N 1" in columns 1-3 and the Program 
1-13 on the IBM Program Order Form. 



16 2 0-0 B A 2. 0.10 
MAIDS-II 

AUTHORS: 0. M. Christenson R. Trost 

DIRECT TECHNICAL INQUIRIES TO: 
R. Trost 

University of Wisconsin 
Nuclear Engineering Dept. 
Madison, Wisconsin 53706 

DESCRIPTION - Problems solved are fen group Neutron 
Diffusion Equations in any one-dimensional geometry 
(including those with central voids) . In addition to the 
basic diffusion calculation, the system will perform 5 
different parameter searches for a specified Eigenvalue 
and calculate both the Neutron and adjoint fluxes. A 
variety of boundary conditions are provided for, both 
homogeneous and inhoraogeneous, which permit the solution 
of certain simple shielding problems, cell problems and 
heat conduction problems. By use of an edit routine Neutron 
Balances may be calculated by region and group. Basic 
input is the Geometric Description, the Boundary Conditions, 
and the Macroscopic Reactor parameters. 

RESTRICTIONS - 

- Number of groups less than or equal to 4. 

- Number of regions less than or e^qual to 10. 

- Number of space points less than or equal to 100. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model I or II, 60K 
memory, card I/O, 1143 Printer, 1 disk drive. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 



DIRECT TECHNICAL INQUIRIES TO: 
Robert Greenblatt 
800 S Long Beach Avenue 
Freeport, H.Y. 

DESCBIPTION - This program was designed to aid a 
Crystallographer in indexing D-spaces obtained from a 
powder photograph. The input consists of the measured 
D-spaces, on cards, and the operator's choices for Crystal 
System and Lattice Constant (s) on the typewriter. 

Using the operator's repeat distances, and an internally 
generated Hiller Index, the computer calculates theoretical 
D-spaces. These are compared to the measured D-spaces 
until a match is found. The value of the actual D-space 
and the Miller Index is then printed. 

PROGRAMMING SYSTEMS - Written in PDQ FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - Program occupies approximately 
13,500 core positions. Eguipment required - Card I/O with, 
TNS, TNF, MF; Indirect Addressing on 1620 Model I. 
Requirements which can be easily removed are TNS, TNF, 
HF, and Indirect Addressing. 

Additional Remarks - The output is supressed to eliminate 
superfluous indices. For example, in the Isometric System 
only the 001 value is indexed not 100 and 0109. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620083005 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 1-13 en the IBM Program Order Form. 



1620-06.4.002 

INTENSITY COJ SECTION PROGRAM FOR NORMAL - BEAM OR 
BflUI-INCLIHATION SETTING 

AUTHOR: DR. R. Shiono 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. R. Shiono 

Crystallography Laboratory 
University of Pittsburgh 
Pittsburgh 13, Pennsylvania 

DESRCIPTION - The program applies the Lorent2-Polarization 
Factor to the observed intensities of X-ray diffraction 
by single crystal. Intensities of Normal-Beam or Iqui- 
Inclination Settings and also of Single Crystal Orienter 
may be corrected by this program. Any Crystal Symmetry, 
and Axis, any number of reflexions. Up to 31st layer. 
Storage reguirement-7470. Equipment-Card I/O, 20K core. 
Automatic Divide. Indirect Addressing, HOVE FLAG. The 
output cards are in the format of the input cards of 
structure factor program. Written in SPS, Fixed Point. 
Runs mostly in maximum punching speed. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 



CONTRIBUTED PROGRAHS 



1620 



CONTINUED FROM PRIOR PAGB 

MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGRAH NUMBER 1620084002 

Indicate "E N 1** in colunns 1-3 and the Prograi Number 
in colunns 4-13 on the IBM Program Order Farm. 



1620_;08 i 4_.003 

INTERPOLATION Of 1X_2_6I£ S CATTERING P AC TOE TABLES 

AOTHOH: Dr. R. Shiono 

DIRECT TECHNICAL INQOIBIES TO: 

Dr. R. Shiono 

Crystallography Laboratory 
University of Pittsburgh 
Pittsburgh 13, Pennsylvania 

DESCRIPTION - Given a table of atonic scattering factors 
for X-ray with equal or unegual intervals of sin (/X, the 
prograi Interpolates the table and prepares a new table 
of egaal intervals either in sin or sin O/X. Aitkens 
process of four point iteration. Storage Reguirenent-4555. 
Equipment- Card I/O, 20K core. Automatic Divide, Indirect 
Addressing, HP, TNF instructions. Britten in SPS, Fixed 
Point. When so specified, the program prepares and punches 
out the atonic F table cards to be used in structure factor 
program 1620-0 (8.4.004). Typewriter output (and use of 
TNF) is optional. 

BASIC FRCGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 

MACHINE READABLE - None. 

CHDEEING INFOHMATION: PROGRAM NUMBER 1620084003 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IEM Program Order Form. 



1620-08. 4.E04 

STRUCTUBF FACTOR CALCOLATICN IN X-RAY CRYSTALLOGRAPHY 



AUTHOR: Dr. S. Shiono 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. R. Shiono 

crystallography Laboratory 
University of Pittsburgh 
Pittsburgh 13, Pennsylvania 

DESCRIPTION - Given a set of atomic coordinates with the 
atomic scattering factors and associated individual 
isotropic temperature factors, the program calculates the 
structure factors for each reflexion in any symmetry class. 
Mathematical method - A seperate expanded form is used 
for each of Bonoclinic and orthorhombic Class. Storage 
Requirement - 12913 plus locations for coordinates. 
Equipment-Card I/O, 20K core. Automatic Divide, Indirect 
Addressing, MP, TNF instructions. Written in SPS, Fixed 
Point. Uses the output of Intensity Correction Program 
(1620-0 8.4.002). The output of this program is in the 
forn of the input to two or three Dimensional Fourier 
Synthesis programs (8.4.005 8.4.006). 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEEING INFORMATION: PBOGHAM NUMBER 1620084004 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



J620r08.-4_.0e5 

SENEGAL TWO DIMENSIONAL FOUR IER SYNTHESIS PROGRAM FOR 
IzMl CSISTALLCGHAPHY 

AUTHORS: David Hall Ryonosuke Shiono 

DIRECT TECHNICAL INQOIBIES TO: 
Dr. R. Shiono 

Crystallography Laboratory 
University of Pittsburgh 
Pittsburgh 13, Pennsylvania 

DESCRIPTION - A general Fourier projection program for 
any symmetry. The electron density of Patterson Function 
as wel'l as the difference Fourier nay be calculated. The 
output is either on cards or on typewriter. A built-in 
table of trigonometric function is used. 1/100th of the 
cell or its multiple. Any nunber of reflexions in any 
order. Maxima) H2 index is 30. Maxinun number of points 
in X1 direction in one calculation is 26. Calculates 
between any desired points. Within one Unit Cell or two 
adjacent Cells. Storage Reguirement-18512. Eguipment: 
Card I/O, 20K core. Indirect Addressing, M. F. Written 
in SPS, Fixed Point. Uses the output of structure factor 
prograi (8.4.004) as the input. A plotting program (1620- 
8.4.007) is available to plot the output. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE EEADABLE - None. 



CONTINUED FROM PRIOR COLUMN 

ORDERING INFORMATION: PROGRAM NUMBER 1620084005 



Indicate "B M 1" in colunns 1-3 and the Program Nunber 
in columns 4-13 on the IBM Program Order Forn. 



1620-08.4.006 

GENERAL THREE DIMENSIONAL FOUBIEB SYNTHESIS PBOGRAH FOR 
XtRAY CRYSTALLOGRAPHY 

AUTHORS: David Hall Ryonosuke shiono 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. R. Shiono 

Crystallography Laboratory 
University of Pittsburgh 
Pittsburgh 13, Pennsylvania 

DESCRIPTION - A general Three Dimensional Fourier Synthesis 
progran for any symmetry. Fourier, Difference Fourier 
or Patterson Synthesis may be calculated. The output is 
either on cards or on typewriter. A built-in Trigononetric 
Table is used. 1/100th of the cell or its multiple, 
calculates between two desired positions, even beyond one 
Unit Cell. Maximum index H2 is 30. Maximum number of 
points in XI direction in one pass is 26. Any number of 
reflexions in any order of indices. Storage requirements- 
19994. Eguipment - Card I/O, 20K Core, Indirect Addressing, 
MF instruction. Written in SPS, Fixed Point. Uses the 
output of structure factor program (1620-0 8.4.004) as 
the input. Plotting program (8.4.007) is available to 
plot the output. 

BASIC PBOGRAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620084006 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-08.4_.007 

ALPHABETIC PLOTTING PBOGHAM FOB THE OUTPUT OF FOUBIEB 
SYNTHESIS PROGRAM 

AUTHOR: Dr. B. Shiono 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. R. Shiono 

Crystallography Laboratory 
University of Pittsburgh 
Pittsburgh 13, Pennsylvania 

DESCRIPTION - The program reads in the output cards of 
Fourier programs (1620-0 8.4.005, 08.4.006) and types out 
the electron density maps in a suitable graded alphabetic 
characters representation for a direct contouring. The 
angle of the cell may be approximated within the mechanical 
and physical limitations. Storage reguireients-2897. 
Eguipment - Card I/O, 20K core. Indirect Addressing. 
Written in sps. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NDHBER 1620084007 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Farm. 



1620_ = 08 i 4 i 008 

INTER AND INTRA-HOIECDL AR ATOMIC DISTANCE CALCULATION IN 
X-RAY CRYSTALLOGEAPHY 

AUTHORS: DB. S. S. C. Chu R. Shiono 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. S. S. C. Chu 
Crystallography Laboratory 
University of Pittsburgh 
Pittsburgh 13, Pa. 

DESCRIPTION - Given a set of atomic coordinates for 
independent positions with a set of symmetry relations, 
the program calculates all possible interatomic distance 
from the independent atoms to any atom within the specified 
limit of length, in the 27 neighbouring cells. The 
analytical expression for distance is used. Any symmetry, 
maximum number of independent atoms 100, naxisun nunber 
of symmetries 200, maximum length of distance 99.9 A. 
Storage requirement - 15547. 

Eguipment - Card I/O, 20K core. Automatic Divide, Indirect 
Addressing, MF TNF instructions. Written in SPS, Fixed 
Point. The output cards may be used as the input of all 
angle calculation programs. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620084008 



CONTRIBUTED PEOGEA8S 



CONTINUED FROM PBIOB PAGE 



CONTINUED FBOH PBIOB COLUMN 



Indicate "B N 1" in columns 1-3 and the Program Num 
in cclunns 4-13 on the IBM Program Order Foci. 



1620 Z 08..4..J12 

loiECULAB I2SHOLA II 



AUTHORS: J. M. Van der veen 



Denzer, Or. 



DIBECT TECHNICAL INQUIRIES TO: 
Dr. J. B. Venderveen 
Stevens Institute of Technology 
Dept. of chemistry S Chemical Eng. 
Hohoken, New Jersey 

DESCRIPTION - The program generates all possible empirical 
formulae that fit the per cent compsition analytical data. 
Input restrictions as to the number of atoms of any element 
are allowed. Also the allowable modecular weight range 
nay be specified. The method consists of systematically 
permuting the nuaber of atoms of each element and 
determining whether the resulting molecular weight is 
consistent with the input data. The program is restricted 
to 10 elements in a compound. Storage used by program 
is 31K. Eguipaent required by program is a 1620 Model 
1 with card input/output. Programmed in - FORTRAN II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Srite-up on Hicrofiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620084012 

Indicate "B N 1" in columns 1-3 and the Erogram Number 
in columns 4-13 on the IBM Program Order Form. 



The program requires a 20K 1620 card system with Indirect 
Addressing. Programmed in 1620/1710 SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620084014 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Fora. 



1620-08.4.015 

ELEMENTS OF A POLYHEDRON (CRYSTAL) 

AUTHOR: H. Tompa 

DIRECT TECHNICAL INQUIRIES TO: 
H. Tompa 

Union Carbide European Research Associates 
95 Rue Gatti De Gamond 
Brussels 18, Belgium 

DESCRIPTION - The program computes parameters characterizing 
the vertices and edges of a convex polyhedron (crystal) 
from parameters characterizing the faces. The output can 
be used directly as input to the program "Absorption 
Correction in Crystal Structure Analysis". The polyhedron 
must have no reentrant angles, must not have more than 
20 faces or more than 25 vertices and there must not be 
more than four faces meeting in any vertex. 



Prograi 

Format. 



reguires a 20K 1620. Programmed in FCBTRAN with 



1620-ge. 4.813 

H0LICU1AR PEAK FINDEB 

AUTHORS: Dr. J. Vanderveen G. Denzer, Jr. 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. J. Vanderveen 

Dept. of Chemistry S chemical engineering 
Stevens Institute of Technology 
Hoboken, New Jersey 

DESCRIPTION - The program utilizes the output from MFP- 
II File No. 8.4.012, and a portion of a compounds Mass 
spectrum to select the correct composition of the parention 
and to suggest possible compositions for the high mass 
peaks in the mass spectrum. Verification of compositions 
is possible from the PS1 and P62 intensities given in the 
output as well as from the exact mass of fragment also 
given. Method - Since MFP-II output data gives a list 
of all possible formulae corresponding to the analysis 
data, the composition of the parent is that of one of these 
formulae. Each one in turn is checked for the loss of 
various fragments (fragments to be used are built into 
program) to see if such a loss could explain any of the 
observed mass peaks. Output consists of those formulae 
which explain any of the masses observed along with the 
PS1 and Pfi2 intensities which would result from such a 
process. The actual parent will then be the formulae which 
give the best fit to the spectrum. 

Eguipment required by program - Card input/output 1620 
Model 1X. Additional remarks - The card data for the 
program is generated by MFP-II Molecular Formulae 
program_II. File number 08.4.012. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up 
MACHINE READABLE - None. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620084015 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Fora. 



1620-08.4.016 



TWO-DIMENSIONAL ABSORPTION CORRECTION IN CRYSTAL STRUCTURE 
ANALYSIS 



AUTHOR: 



Tompa 



DIRECT TECHNICAL INQUIRIES TO: 
H. Tompa 

Union Carbide Research Associates 
95 Rue Gatti De Gamond 
Brussels 18, Belgium 

DESCRIPTION - The program computes the absorption correction 
in crystal structure analysis i.e.; the correction which 
has to be applied to the measured intensity of the 
diffracted beam due to absorption during its passage through 
the crystal. The crystal is assumed to be two-dimensional 
and to be a parallelogram. The mathematical method used 
is based on an exact analytical expression and not on 
numerical integration. 



Program reguires 20K 1620 card system. 
FORTRAN with Format. 



Programmed in 



on Microfiche only. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620084016 



OFDEBING INFORMATION: PROGRAM NUMBER 1620084013 



Indicate "1 N 1" in columns 1-3 and the Erogram Number 
in columns 4-13 on the IBM Program Order Form. 



Indicate "B N 1" in columns 1-3 and the Prograi Number 
in columns 4-13 en the IBM Program Order Form. 



1620-0J^4^il4 

*£SORPTICN COBRECTION IN CRYSTAL STRUCTURE ANALYSIS 



AUTHOR: 



H. Tompa 



DIRECT TECHNICAL INQUIRIES TC: 
H. Toapa ^ 

Union Carbide European Research Associates 
95 Bue Gatti De Gauond 
Brussels 18, Belgium 

DESCRIPTION - The program computes the absorption correction 
in a crystal structure analysis, i.e.; the correction which 
has to be applied to the measured intensity of the 
diffracted beam due to absorption during its passage through 
the crystal. The output of the program "Elements of a 
Polyhedron (Crystal) " can be used directly as input as 
regards the crystal. The mathematical method used is based 
on an exact analytical expression and not on numerical 
integration. The crystal must have no reentrant angles, 
must not have more than 20 faces meeting in any vertex. 
The SPS II processor used has been modified to increase 
the symbol table area by removing the compressor and the 
subroutine facilities. 



1620=08.4^.017 

TWPJTDIMJNSIONAL ABSORPTION CORRECT ION IN CRYSTAL STRUCTURE 

AHilSIS FOE PAS ALLJLOGEAMS 

AUTHOR: H. Tompa 

DIRECT TECHNICAL INQUIRIES TO: 
H. Tompa 

Union Carbide European Researarch Associates 
95 Rue Gatti De Gamond 
Brussels 18, Belgium 

DESCRIPTION - The program computes the absorption correction 
in crystal structure analysis i.e.; the correction which 
has to be applied to the measured intensity of the 
diffracted beam due to absorption during its passage through 
the crystal. The crystal is assumed to be two-dimensional 
and to be a parallelogram. The methematical method used 
is based on an exact analytical expression and not on 
numerical integration. 

Program reguires 20K 1620 card system. 
FORTRAN with Format. 



Programmed in 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE READABLE - None. 



CONTSIBUTED PROGRAMS 



PAGE 086 1620 

CONTINUED FROB PRIOR PAGE 

ORDERING INFORMATION: PROGBAH NUMBER 1620084017 

Indicate M B N 1** in columns 1-3 and the Prog ran Number 
in columns 4-13 on the IBM Program Order Form. 



162 0209-0^811 

GIAPH 2 - A PRINTER PLOTTING SUBROUTINE PROG RAH 



zJS 



AUTHORS: 



Putnins R. No rt house 



DIRECT TECHNICAL INQUIRIES TC: 
J. Putnins 

University of Wisconsin 
Milwaukee, Wisconsin 53201 

DESCRIPTION - GRAPH 2 provides the user a neans of graphing 
numerical data without the use of a CALCOHP Digital Plotter. 
The routine is self-scaling and has variable length axes. 
Output is made on the on-line printer. 

PROGRAMMING SYSTEMS - GRAPH 2 is a subroutine programmed 

in FORTRAN II D with Format. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model I or II, 20K 

decimal digits, 1f43 Printer, 1311 Disk Drive and card 

reader. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620090001 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16_20-0jL,2 i e08 

Sllli «Il COMPUTATIONS PROGRAM 

AUTHORS: C. Carlson J. Feeney 

DIRECT TECHNICAL INQUIRIES TO: 
J. F. Gibbons 
State Highway Conmisssion 
Bridge section 
State Office Building 
Madison, Hisconsin 

DESCRIPTION - Computes the velocity, area, and flow for 
an individual channel in a flow system and the average 
velocity, area, and flow for the entire network. 

PHOGRAMMING SYSTEMS - Britten in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - Tape system, memory 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092008 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



!6.2£=0i.i2-J09 

SKEWED BRIDGE ELEVATIONS 



AUTHORS: C. E. Carlson 



F. Gibbons 



DIRECT TECHNICAL INQUIRIES TO: 
J. F. Gibbons 
State Highway Commission 
state Office Building 
Madison , ^Wisconsin 

DESCRIPTION - The program computes slab elevations and 
geometry for bridge superstructures with skewed substructure 
units on a vertical curve with straight horizontal 
alignment. Tape system, memory 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092009 

Indicate "E N 1" in columns 1-3 and the Erogram Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09^2.^0 

CURVE JRIDGE PROGRAM 

AUTHORS: C. E. Carlson J. F- Gihbons 

DIRECT TECHNICAL INQUIRIES TO: 
J. F. Gibbons 
State Highway Commission 
Bridge Section State Office Building 
Madison, Wisconsin 

DESCRIPTION - Computes slab elevations and geometry for 
bridge superstructures with skewed substructure units on 



CONTINUED FROM PRIOR COLUMN 

a vertical curve and curved horizontal alignment. The 
program can lay out in four different ways. Restrictions 
Range-All points must be on the horizontal curve. 

PROGRAMMING SYSTEMS - Written in. FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - Tape system, memory 20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092010 

Indicate "B N 1" in columns 1-3 and the Prograa Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^09^.2. 01 .1 

COAL PILE VOLUME 

AUTHORS: R. L. Patterson V. A. Lippo 

DIRECT TECHNICAL INQUIRIES TO: 

R. L. Patterson 

West Penn Power Company 

Cabin Hill 

Greensburg, Pennsylvania 

DESCRIPTION - Obtains the volume of coal storage piles 
using cross-section data obtained by field or aerial survey. 
Storage 6280 digits, SPS program. Memory 20K, tape system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADAELE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092011 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



J620209..2..012 

RELOCATION OFFSETS 

AUTHOR: P. 0. Roberts 

DIRECT TECHNICAL INQUIRIES TO: 

P. 0. Roberts 

Assistant Professor 

Civil Engineering Boom 1-263 

Massachusetts Institute of Technology 

Cambridge 39, Massachusetts 



DESCRIPTION - This program computes the geometry of a 
highway centerline alignment and the offsets fcr an original 
survey line to the new centerline for cases where changes 
are desired. The program is accomplished in two parts. 
Part One computes the geometry of the base line and the 
new center line, given the state plane coordinates of the 
P.I.'s and one parameter defining each curve. Part Two 
works with the table of geometry prepared by Part One and 
computes the center line stations and offsets for each 
base line station. Memory 20K, cards. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092012 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^09^2^014 

GENUAL Y.IBTUAL WORK ANALYSIS OF STRUCTURES 



AUTHOBS: 



Burrows 



E. okeefe 



DIRECT TECHNICAL INQUIRIES TO: 

W. A. Burrows 
Dravo Corporation 
Neville Island 
Pittsburgh 25, Pennsylvania 

DESCRIPTION - The solution of indeterminate structures 
with members subject to bending and axial loads by the 
method of virtual work. 



PROGRAMMING SYSTEMS - Written in FCBTRAN. 
MINIMUM SYSTEM REQUIREMENTS - Memory 20K. 
BASIC PROGRAM PACKAGE 



1620 system. 



DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 



ORDERING INFORMATION: PROGRAM NUMBEB 1620092014 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



CONTRIBUTED PEOGBAKS 



ll>2flj:09 i 2 J J!15 

TRANSMISSION TOWER DESIGN 



CONTINUED FROM PRIOR COLUMN 



PBOGBAH NUMBER 
EXTENSION 



AUTHOR: 



Patterson 



DIBECT TECHNICAL INQUIRIES TO: 
B. L. Patterson 
Rest Penn Power Company 
Cabin Hill 
Greensburg, Pennsylvania 

DESCRIPTION - Designs a double-circuit transmission tower 
with known dimensions; to withstand loads determined by 
the conductor and static wire sizes specified in input. 
The tower Bust be composed of statically determinate trusses 
in the transverse and longitudinal faces. The tower is 
designed in one of three materials as selected by the user. 
The tower may have a rectangular of square base and be 
one of four types; suspension, anchor, angle, or dead-end. 
Tower with 140 members per face maximum. Fixed point. 
Machine language program. Memory 40K, Automatic Divide, 
paper tape machine. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PEOGBAM NOMBEB 1620092015 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620 z 09..2_.016 *M 

DIM DESIGN SYSTEM 20K 

AUTHORS: P. 0. Boberts A. Villaveces 

DIBECT TECHNICAL INQUIRIES TO: 
P. 0. Roberts 

Asst. Prof, of civil Engineering 
Boom 1-253 

Massachusetts Institute of Technology 
Cambridge 39, Massachusetts 

DESCRIPTION - The DTM Design System is an integrated series 
of electronic computer programs for the final design and 
location of highways. The system can be divided logically 
into four separate phases; the Terrain Preparation phase, 
the Alignment Design phase, the Roadway Design phase, and 
the Material Classification phase. 

Each phase is implemented with one or more computer 
programs, as follows: Terrain Preparation (Terrain 
Preparation/Edit) ; Alignment Design {Alignment 
Design/Geometry, Alignment Design/Offset, and Profile 
Plot) ; Roadway Design (Roadway Design/Preparation, Roadway 
Design/Template, Boadway Design/Volumes and Slope Stakes 
& Mass Haul Plot) ; Materials Classification (Materials 
Classification/Preparation , and Material 
Classification/Volumes) . 

PBCGBAMWING SYSTEMS - Britten in FOBTBAN. 



BASIC 
OPTIONAL 



none 
none 



DISTRIBUTION MEDIUM 
TYPE CODE 



PT 

none 



BSEB VOLUME 
REQUIREMENT 



none 
none 



1620209^2.018 

SPS TBAVERS E AND CURVE DATA PROGRAM 

AUTHOR: J. Jacobsen 

DIRECT TECHNICAL INQUIRIES TO: 
J. Jacobsen 

Electronic Computer, Inc. 
5729 W. Vliet Street 
Milwaukee 8, Wisconsin 

DESCRIPTION - For performing subdivision calculations. 
Solves open and closed traverses, saves computed unknowns 
for use in subsequent traverses, stores coordinates points, 
computes curve data and areas. Input is by tape or 
typewriter. Utilizes 17000 locations with remainder used 
for storage. Tape system, memory 20K, Indirect Addressing. 



MINIMUM SYSTEM REQUIREMENTS 



eraory 20K, cards. 



EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620092016 

Indicate M E N 1" in columns 1-3 and the Program Number 
in columns H-.13 on the IBM Program Order Form. 



BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up 
MACHINE READABLE - None. 



an Microfiche only. 



OBDEBING INFOEMATION: PROGBAM NUMBER 1620092018 



indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



.1620309^2.019 

DTM DESIGN SYSTEM H0K 



AUTHORS: Paul o. Roberts John A. Currie 

DIRECT TECHNICAL INQUIRIES TO: 
Paul 0. Roberts 

Asst. Prof, of Civil Engineering 
Boom 1-263 

Massachusetts Institute of Technology 
Cambridge 39, Massachusetts 

The DTM Design System is an integrated series of electronic 
computer programs for the final design and location of 
highways. The system can be divided logically into four 
separate phases; the Terrain Preparation phase, the 
Alignment Design phase, the Roadway Design phase, and the 
Material Classification phase. Each phase is implemented 
with one or more computer programs, as follows; Terrain 
Preparation (Terrain Preparation/Edit) , Alignment Design 
(Alignment Design/Program Profile Plot) , Roadway resign 
(Boadway Design/Program, Slope Stakes and Mass Haul Plot) ; 
Materials Classification (Material Classification/Volumes). 

PROGRAMMING SYSTEMS - Written in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - No other special features 
required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NOMBEB 1620092019 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620-09.2.017 

CONTINUOOS BEAM ANALYSIS AND STEEL BEAM DESIGN 

ADTHOBS: J. F. Gibbons S. W. Woods 

DIBECT TECHNICAL INQUIRIES TO: 
S. W. Woods 

State Highway Commission of Wisconsin 
Madison, Wisconsin 

DESCRIPTION - The program computes beam characteristics, 
dead lead moments and shears, influence lines, and live 
load moments, shears, and reactions for continuous beams 
with a maximum of five spans. A steel beam is designed 
non-compositeiy and compositely for up tc three different 
allowable steel stresses giving plate sizes and shear lug 
spacing. The program will solve beams with intermediate 
expansion hinges. The steel beam design uses the criterial 
for alternating stresses as specified by AWS and A.SSHO. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 



MINIMUM SYSTEM BEQUIRMENTS - A 1620, 
reguired. 



0K tape I/O is 



BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092017 



1620-09.2.020 

SSlPUTEE SOLUTIONS FOR SLOPE STABILITY ANALYSIS 



*M 



AUTBOES: L. C. Slack 



R. L. James 



DIRECT TECHNICAL INQUIRIES TO: 
R. L. James 

U. S. Army Corps of Engineers 
517 Gold Avenue, S.W. 
Albuguergue, New Mexico 

DESCRIPTION - Computes the factor of safety against sliding 
on a particular failure arc for an earth embankment. The 
packaqe contains the following six programs; Program 1- 
One-part program to completely analyze the end of 
construction condition; Program 1A-0ne<- part-Drawdown 
Condition (no water pressure on sides of slices); Program 
2-Part one all two-part programs; Program 2A-Fart Two-End 
of Construction; Program 2B-Part Two-Drawdown {no water 
pressure on sides of slices) ; Program 2C-Part Two-Drawdown 
(water pressure on sides of slices) . The two-part programs 
are designed tc provide additional capacity in order to 
analyze more complex embankments and to allow for the 
consideration of water pressure in the drawdown condition. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - 19,980 each program (varies 
slightly frcm program to program) , memory 20K, and no other 
special features reguired. 

BASIC PROGRAM PACKAGE 



CONTRIBUTED PBOGRABS 



PAGE 086 1620 

CONTINUED FROM PBIOB PAGE 

DOCUMENTATION - Nrite-up on Bicrofiche only. 

BACBIHE READABLE - Bone. 

ORDERING IBFOBBATION: PEOGEAB NUMBER 1620092020 

Indicate "B H 1" in columns 1-3 and the Program number 
in columns u-13 on the IBN Program Order Form. 



1620 = 09..2..02_1 

IBVEBSE GEODETIC PO SIIIO B CCBPUTATIOB 

AUTHOR: John F. McMillan 

DIRECT TECBBICAI INQUIRIES TO: 
John F. McMillan 
los Angeles County 
Department of County Engineer 
108 Best Second Street 
los Angeles 12, California 

DESCBIPTIOB - A program for accurately determining the 
forward azimuth, back azimuth, delta alpha and geodetic 
distance (in meters and feet) between two survey control 
stations, knowing the latitude and longitude of each 
station. 20K storage IBB 1620 Data Processing System with 
20K storage and the following special attachments (A) 
Automatic Divide (B) Transfer numerical Strip (C) Transfer 
Numerical Fill (D) Move Flag. 

BASIC PBOGBAB PACKAGE 

DOCUMENTATION - »rite-up on Bicrofiche only. 

HACBIBE BEADABIE - Bone. 

OBDEBIBG INFORMATION: PBOGBAB NUMBER 1620092021 

Indicate "B B 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620-09.2.023 

BATES SURFACE PROFILE SAN2=X 



AUTHOR: 



convery 



DIRECT TECBBICAI INQUIRIES TO: 
Clyde L. Palmer 
City Engineer 
528 City - County Building 
Detroit, Michigan 

DESCBIPTIOB - Solves the head losses in a continuous sewer 
system. Memory 20K; FORTRAN Format. 

BASIC FROGBAB PACKAGE 

DOCUBEBTATION - Nrite-up on Bicrofiche only. 
BACBINE BEADABIE - None. 

OBDEBIBG INFORMATION: PBOGRAB BUHBEB 1620092023 

Indicate "B B 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



!fi20 = 0;UZ.02U. 

BFAB CAHBER CALCDIATIOHS 



AUTHOR: 



Eugene D. Lee 



DIEECT TECHNICAL INQUIRIES TO: 
Eugene D. Lee 
Computer Section 

Hashington state Highway Department 
Highway-License Building 
Olympia, Nashington 

DESCFIPTION - This program will compute the deflections 
at the tenth points of a beam, and at the third points 
of a cantilever. The slopes at the bean ends and at the 
cantilever free end also are computed. 

FRCGBABMING SYSTEBS - Britten in FORTRAN. 

HINIBUB SYSTEM REQUIREMEBTS - Indirect Addressing and 
Automatic Divide. No other special features required. 
20K. 

EASIC PBOGRAB PACKAGE 

DOCUBEBTATION - Brite-up on Bicrofiche only. 
MACHINE READABLE - None. 

ORDERING INFORBATION: PBOGRAB NUBBEE 1620092020 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



16 20=09^.2.025 

SlNERAL SURVEY TRAVERSE PROGJAB 

AUTBOB: Jess flartinez 

CIBECT TECHNICAL INQUIRIES TO: 
Jess Martinez 
Board of Public Borks 
Special Services Division 



CONTINUED FROM PRIOR C010MB 

City Ball 

Los Angeles 12, California 

DESCRIPTION - Program for solving and balancing survey 
traverses, area computations, and azimuth rotation 
adjustments. Bemory 20K, Automatic Divide, 1622 Card Read 
Punch - additional instructions. This program was assembled 
using SPS. All subroutines are fixed point. 

BASIC PBOGBAB PACKAGI 

DOCUMENTATION - «rite-up on Bicrofiche only. 
BACBIBE BEADABIE - None. 

ORDERING INFORBATIOB: PROGRAM NUMBER 1620092025 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620-09.2.026 

DTfl LOCATION SYSTEM 



AUTHORS: 



Roberts J. H. Suhrbier 



DIRECT TECHNICAL INQUIRIES TO: 
Br. Paul 0. Roberts 
Asst. Prof, of Civil Engineering 
Massachusetts Institute of Technology 
Cambridge 39, Massachusetts 

DESCRIPTION - The Digital Terrain Model Location System 
and its resultant series of electronic digital computer 
programs are intended to be used in the preliminary or 
reconnaissance phase of the highway location and design 
process. The programs that compose the system have been 
integrated in such a way that they closely supplement each 
other and at the sane time parallel the location and design 
procedure that is followed by an engineer. 

PBOGRABBING SYSTEBS - Britten in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - 20K memory, cards, and no 
special features required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - Bone. 

ORDERIBG INFOBBATICN: PROGRAB NUMBER 1620092026 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.2.027 

HORIZONTAL ALIGNMENT DATA FRO M COO RDINAT ES JTAPEJ. 

AUTHOR: H. Coucheron-Aamot 

DIRECT TECHNICAL INQUIRIES TO: 
H. Coucheron-Aamot 

U. S. Army Eng. District, Albuquerque 
corps of Engineers 
P. 0. Box 1538 
Albuguergue, New Mexico 

DESCRIPTION - Computes traverse and curve data for 
horizontal alignments. The program is in three parts, 
the first of which computes the traverse data 6 punches 
a data tape that may be used with either the second or 
third part to compute simple curve data and stationing 
or spiralized curve data and stationing, respectively. 
Input data required are the stationing of back P.O.T., 
numeric designation of 1st P.I., number of sets of 
coordinates, grid factor, coordinates of P.I.'s and P.O.T.'s 
and radii of the curves corresponding to the P.I.*s. 
Equipment requirements include the IBM 1620 Data Processing 
system with 1621 Paper Tape Reader and 1621 Paper Tape 
Punch. The basic 20K memory is adequate and no special 
features or off-line equipment are required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092027 

Indicate "B N 1" in columns 1-3 and the Prograt Number 
in columns 4-13 en the IBM Program Order Form. 



1620-09.2.028 

BACKNATJS CUJVE PROGRAM 



AUTHOR: D. Rullinghorst 

DIBECT TECBNICAL INQUIRIES TO: 
D. Bullinghorst 

New Hampshire Department of Public 
Borks and Bighways 
24 South Main Street 
Concord, New Bampshire 

DESCRIPTIOB - Calculation of water surface profiles along 
natural stream channels by use of observed cross-sections, 
with supplementary output concerning velocity, energy-head, 
etc. Special provisions minimize amount of input required. 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

facilities evaluation of changes due to change in friction 
coefficients and permit use of composite cross-sections 
with segments of differing roughness. 

PBOGRAMHING SYSTEMS - Britten in FOBTBAN. 

MINIMUM SYSTEM BEQUIBEMENTS - IBM 1622 Card Bead Punch 

and IBM 1620 digital coiputer with 20K lienor; and no special 

features. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEACABLE - Hone. 

OBDEBI8G INFOBMATIOH: PBOGBAM NUMBER 1620092008 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



CONTINOED FEOH PRI0B COLUMN 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PBOGRAM PACKAGE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620092031 



BASIC 
OPTIONAL 



PBOGBAM NUMBEB 
EXTENSION 



none 
none 



DISTBIBUTION MEDIUM 
TYPE CODE 



DTB* 
none 



USES VOLUME 
BEQUIREMENT 



none 
none 



1620-09.2.032 

VEHICLE SIMULATION AND OPEBATING COST SYSTEM 



16 2 0^09^,2.029 

*ATJB HAMMEB 



AUTHOB: 



J. A. N. Lee 



DIRECT TECHNICAL INQUIRIES TO: 
J. A. N. Lee 

commonwealth of Massachusetts 
University of Massachusetts 
Amherst, Mass. 

DESCRIPTION - The analysis of water hammer effects in long 
pipelines due to the sudden closure of a gate or valve 
at the downstream end. The valve is assumed to close in 
snail steps in a prescribed form. 

MINIMUMSYSTEK REQUIREMENTS - Memory 20K, Automatic Divide, 
and minimum of 11 in. typewriter paper. 

EASIC PBOGBAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092029 

Indicate "B N 1" in columns 1-3 and the Program Nunber 
in colunns 4-13 on the IBM Program Order Forn. 



1620309.2^030 

THE BUCKLIHG, ANALYSIS OF OUTSTANDING COMPR ESSI ON CHOBDS 



AUTHOR: 



Lee 



DIRECT TECHNICAL INQUIRIES TO: 
J. A. N. Lee 

Commonwealth of Massachusetts 
University of Massachusetts* 
Amherst, Mass. 

DESCRIPTION - The computation of the critical load in 
outstanding conpression chords in trusses. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, Automatic Divide, 
and no other special features reguired. 

BASIC PBOGBAM PACKAGE 

EOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE BEADABLE - Hone. 

ORDEBING INFCBHATION: FEOGRAM NUMBEB 1620092030 

Indicate "E N 1" in columns 1-3 and the Erogram Number 
in colunns 4-13 on the IBM Program Order Forn. 



AUTHOBS: A. S. Lang D. H. Bobbins 
P. 0. Roberts 

DIBECT TECHNICAL INCUIBIES TO: 
P. 0. Boberts 

Assistant Proffessor Civil Engineering 
Massachusetts Institute of Technology 
Cambridge 39, Mass. 

DESCRIPTION - The Vehicle simulation and Operating Cost 
System models or simulates the operation of a vehicle over 
a specific highway alignment and determines the ccsts 
associated with the movement. Vehicle operating costs 
are a direct function of vehicle road speeds, engine rpa, 
vehicle tractive effort, and per cent of full engine load. 
These four items are in turn directly related to certain 
highway design characteristics selected by the engineer. 
These characteristics include the vertical alignment, the 
pavement type, and the operational restrictions placed 
on speed. The programs within the system take the above 
design characteristics and description of the vehicle and 
evaluate the conseguences of these characteristics on 
engine performance. These conseguences are then converted 
into associated costs. The system consists of three 
programs. The first, a data preparation progran, 
initializes and consolidates the vehicle, control (wind 
speed, pavenent type, fuel cost, time cost, traffic volumes, 
etc.) , speed profile, and alignment data. The second, 
the vehicle simulation progran, takes the initialized data 
and computes the resulting motion or speed profile. The 
third program, the fuel computation progran, reads in a 
fuel perfornance table and the speed profile and calculates 
fuel consumption and various sunnary cost information. 

PEOGBAMMING SYSTEMS - Written in the FOBTRAN Language. 

MINIMUM SYSTEM REQUIREMENTS - A 1620, 20K nenory, cards, 
no special features reguired. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDERIHG INFCBHATION: PROGRAM NUMBEB 1620092032 

Indicate "B N 1" in colunns 1-3 and the Progran- Number 
in colunns 4-13 on the Ibm Program Order Form. 



1620=19*2^33 

INDETERMINATE 



AUTHORS: 



IBAHE ANALYSIS 
J. Miller 



H. Sharp, III 



1620^09^2.031 * F 

VOLUMETRIC QUANTITIES PBOGJAM 

AUTHOB: J. A. Currie 

DIBECT TECHNICAL INQUIBIBS TO: 
P. 0. Roberts 
Room 1-252 

Massachusetts Institute of Technology 
77 Massachusetts Ave. 
Cambridge, Mass. 

DESCBIPTION - The volumetric quantities progran is designed 
to compute volume quantities for engineering purposes. 
For example, it can be used to compute borrow-pit, 
stockpile, roadwork, dredging, foundations ditchwork, or 
any of the other volume computations associated with a 
design or construction project. The average end area 
nethod is used to compute volumes. The end areas are 
defined by two sets of points referred to as template and 
terrain. The program can be requested to compute the 
intersection of template and terrain (i.e. slope stake) 
when given data on reguired slopes or this feature may 
be ignored and the intersection point given as input data 
(i.e. for foundation work, etc.). The progran is designed 
to be engineer oriented. This allows flexibility and ready 
modification for special or general purpose. 

PEOGBAMMING SYSTEMS - Britten in FOBTRAN. 

MINIMUM SYSTEM BEQUIBEMENTS - 20K cards. 



DIRECT TECHNICAL INQUIBIBS TO: 
J. J. Miller 

U. S. Army Engineer District, 
P. 0. Box 1538 
Albuquerque, Hew Mexico 

DESCBIPTIOH - To provide a rapid analysis of reinforced 
concrete structures, includinq concrete conduits or culverts 
under high fills and a variety of other structures with 
fixed or pinned ends. Program computes fixed-end moments, 
distribution factors, carryover factors, distributed 
moients, shear and unit shear, distances, etc. Structures 
subject to analysis are 1, 2, or 3-cell conduits/culverts- 
1, 2, or 3-fcay bents- 1, 2, or 3-story frames- 1 to 7-span 
beans- and sinqle cr double TS, or LS. The progran is 
divided into three parts. Part one requires 19,935 units 
of memory, part two occupies about 19,260 positions, and 
part three utilizes 16,107 positions. Complete trace 
instructions can be assembled with parts two and three 
only. Modification for card input-output can be 
accomplished with little difficulty, 

PROGRAMMING SYSTEMS - Source programs for all three parts 
are written in the 9/30/61 (Fornat) version of FOBTRAN. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 Data Processing 
Systen with 1621 Paper Tape Beader and 1620 Paper Tape 
Punch. The progran is currently coded for the basic 20K 
nenory, and and no special features or off-line eguipnent 
are necessary. 

BASIC PBOGRAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 

MACHINE READABLE - None. 



CONTBIBOTED PBOGEAHS 



CONTINOED FBOH PEIOB PAGE 

OBDEBING INFOBHATIOH: FEOGEAB BOBBIE 1620092033 

Indicate "B » 1" in columns 1-3 ana the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620r0JL2iil!» 12 

SOBDIVISION JJOGBAB 

AOTHOB: B. S. DobbS 

DIEICI TECHNICAL INQOIBIES TO: 
E. S. DobbS 

Haldemar S. Kelson S Co., Inc. 
1200 St. Charles Ave. 
Self Orleans 13, La. 

EESCBIETIOH - Computes necessary data for the subdivision 
of land into smaller parcels. The program starts «ith 
a closed boundary traverse ana proceeds to compute all 
necessary curves ana tangents. The design engineer then 
submits data for lot computations and receives complete 
information for staking and plotting the subdivision, 
lot characteristics are checked against zoning reguirements. 
Output includes coordinates of points-length and bearing 
of lines-length and radius of arcs-and area, depth, and 
width of lots. 

BINIHOH SYSTEH BEQOIBEHEHTS - Binimum 1620 with card input- 
output 20K» This is a modified version of the paper tape 
program by the same name. 

BASIC EEOGEAB PACKAGE 

DOCOBENTATION - Brite-up on Bicrofiche only. 
HACHINE EEADABLE - Bone. 

CBDEEIBG IBFOEBATIOB: FBOGBAB NOHBEB 1620092031 

Indicate "B B 1" in columns 1-3 ana the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620^09.2^038 

HOBIZONTAL ALIGJBJBT AMD OFFSETS IBJIOJ. 

AUTHOR: J. Peterson 

DIBECT TECBNICA1 IHQOIBIES TO: 
L. H. Borgan 

Bashington state Highway DEpt. 
Highway-Licenses Blag. 
Olympia, Rash. 

DESCRIPTIOB - This program computes the geometry of a 
highway centerline alignment given the coordinates of the 
pi, the length line alignment given the coordinates of 
the pi, the length of Talbot spirals, and the circular 
curve parameters at each pi. Bhen offsets are desired, 
one of the alignments is to be specifiea as the base line 
ana the other the offset line. The offset distance normal 
to the base line, the stationing along the offset line 
ana the skew angle of intersection will be computea at 
each station specified. 

JROGEAHBING SYSTEHS - Britten in SPS. 

BIBIBOB SYSTEB REQOIREBEHTS - A 1620 under 10K memory. 

Cara I/O, Indirect Addressing, Bultiply-Divide, 3 additional 

commands <BF, TBF, TBS). 

BASIC PEOGBAH PACKAGE 

DOCOBENTATION - Brite-up on Bicrofiche only. 

NACBINE READABLE - Bone. 

ORDERING INFOBHATIOH: PROGRAB BOBBEE 1620092038 

Inaicate "B N 1" in columns 1-3 ana the Program Bumber 
in columns 1-13 on the IBB Program Oraer Form. 



1620-09.2.039 

PIPE FRICTICN HEAD LOSS CALCULATIONS IB BATER SOPPLY 
ENGINEERING USING THE DARCY METHOD 



AUTHOR: 



H. Yao 



1620 z 09..2_.036 

DEAD LOB EEAB DEFLECTIONS 



AUTHOB: 



Gibbons 



DIRECT TECHNICAL INQUIRIES TO: 
J. F. Gibbons 
Room 580 

State Office Bldg. 
Hadison, Nisc. 

DESCRIPTION - Computes bean deflection, due to a uniform 
dead load. Homent of inertia may be constant orvariable. 
section dimensions or moments of inertia may be input. 
Beam may be simple or continuous. 

PEOGBABHIBG SYSTEHS - This program is written in FOETBAB 
and may be FOBTBANed for a cara system with no changes 
in the program. 

BIBIBOB SYSTEB HEQUIBEBENTS - Tape I/O and a memory of 
20K. 

EASIC ERCGBAB PACKAGE 

DOC0BENTATI0N - Brite-up on Bicrofiche only. 
BACHINE READABLE - None. 

OBDEBIBG INFOBHATION: PROGEAH NOBBER 1620092036 

Indicate "E N 1" in columns 1-3 and the program Number 
in columns 1-13 on the IBB Program order Form. 



1620 = 0_?_.2..J3_7 

RECTANGULAR BEINFOBCED CONCBJTE CCLOBN ABALISIS - BI-AXIil 

BENDING 

AOTHOR: E. L. cook 

DIRECT TECHNICAL INQOIBIES TO: 
J. F. Gibbons 

State Highway Commission of Wisconsin 
Eridge Section 
Badison, Bisc. 

DESCRIPTION - Computes the maximum concrete and steel 
stresses in a reinforced concrete column with an eccentric 
axial loaa. 

PBCGRAHHING SYSTEHS - The program uses IEH 1620 FOETBAN 
without Format. 

BINIBOH SYSTEB REQOIREBENTS - Tape, and a memory of 20K. 

BASIC PRCGBAB PACKAGE 

DOCOBENTATION - Brite-up on Bicrofiche only. 

BACHIBE READABLE - Bone. 

ORDERING INFORBATION: PEOGRAB NOBBEB 1620092037 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Older Form. 



DIRECT TECHNICAL INQOIRIES TO: 
B. A. B. Boon 

Bobil Computer laboratory, 
Oniversity of Canterbury, 
Christchurch, New Zealand 

DESCRIPTION - Calculates the friction head loss for a given 
pipe flow based on the Darcy eguation for use mainly in 
water supply engineering. Hathematical method- successive 
approximations. Applicable to all pipe flow situations 
including laminar and turbulent flow. 

PROGRABBING SYSTEBS - Language is SPS. 

HINIBOB SYSTEB BEQOIBEBENTS - Bemory 20K, Automatic Divide, 
Floating Point Arithmetic. Storage reguirements- 1150. 

BASIC PEOGRAB PACKAGE 

DOCUHENTATION - Brite-up on Bicrofiche only. 
BACHIBE READABLE - None. 

OBDEBING INFOBHATION: PBOGBAB NOBBEB 1620092039 

Indicate »B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program order Form. 



1620209^2^.010 

GEOHETEIC COHPOTATION 



AUTHOB: 



Peterson 



DIBECT TECHNICAL INQOIBIES TO: 
L. H. Hcrgan 
Computer Engineer 

Bashington State Highway Department 
Highways-Licenses Building 
Olympia, Bashington 

DESCRIPTION - Given distances and bearings of courses, 
this program computes latitudes and departures, coordinates 
and enclosed area. Traverse may be adjusted by compass 
and/or transit rule. Given distances and bearings of 
courses - with distances of two courses unknown, or with 
two bearings unknown, or with one distance and one bearing 
unknown, solves for unknowns. Solves for distances and 
bearings between successively listed coordinates. Given 
circular curve aata ana stationing, computes the radial 
bearing, or given radial bearing computes the stationing. 
Distances, bearings, and coordinates may be stored in one 
problem and recalled into another. 

PBOGBABBING SYSTEBS - The source language is SPS. 

BINIHUB SYSTEB BIQUIEEBENTS - Plane analytic geometry, 
33 cources and 31 memory numbers, memory 20K. Card I/O, 
Indirect Addressing, Bultiply-Diviae, 
(HF, TNF, TNS) . 

BASIC PROGEAH PACKAGE 

DOCOBENTATION - Brite-up on Bicrofiche only. 

BACHIBE READABLE - Bone. 
ORDERIBG INFOBHATION: PROGEAH BOBBER 1620092010 



3 aaaitional commands 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOB PAGE 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^0.9.2.043 

»»SS DIAGRAM MODEL WITH CjtOSS SECTION 



AOTHOR: 



Raub 



1620-09.2.041 

GEOMETRIC COMPUTATION 



AOTHOR: 



Peterson 



DIRECT TECHNICAL INQUIRIES TO: 
L. H. morgan 
Computer Engineer 
Washington state Highway Department 

Highways-Licenses Building 
Olympia, Washington 

DESCRIPTION - Given distances and bearings of courses, 
this program computes latitudes and departures, coordinates 
and enclosed area. Traverse may be adjusted by compass 
and/or transit rule. Given distances and bearings of 
courses - with distances of two courses unknown, or with 
two bearings unknown, or with one distance and one bearing 
unknown, solves for unknowns. Solves for distances and 
bearings between successively listed coordinates. Given 
circular curve data and stationing, computes the radial 
bearings, or given radial bearing computes the stationing. 
Given Talbot spiral data and - (A). Bearing and coordinates 
of point on line, computes its intersection with spiral 
or offset spiral. (B) . Coordinates of center of curve 
and radius, computes its intersection with spiral or offset 
spiral. (C) . Arc length along centerline, computes point 
on spiral or offset spiral. Given common point data and 
scale factor, converts from one coordinate system to 
another. Distances, bearings, and coordinates may be 
stored in one problem and recalled into another. Plane 
analytic geometry. 88 courses and 100 memory numbers. 
This program is identical with the 60K version except the 
maximum number of courses in the 60K version is 98. 

PROGBAHHING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Card I/O, Indirect Addressing, 
Hultiply-Divide, 3 additional commands (BF, TNF, TNS) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092041 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
R. A. Baub 
5614 Jordan Road 
Bethesda 14, Maryland 

DESCRIPTION - The Mass Diagram Model with Cross Section 
is designed to take basic cross section, and alignment- 
profile data, and create vertical curves, toe points, 
ditches, crown and grades, and mass diagram plot data. 
The first part, input from the profile, creates vertical 
curves, lengths, PVC, VCT, and height at each station along 
the curve. In addition, its output is inserted into the 
mass diagram (part two) input deck, to utilize vertical 
curves in grade field notes, maps, and alignment and profile 
sheets. There is cne other similar program on file, however 
it is more scientific and does not include ditching, 
variable side slopes, or ledge cuts. Further the mass 
diagram model produces output which can readily be used 
by the contractor. 

PROGRAMMING SYSTEMS - Written in FORTRAN (with FORMAT). 

MINIMUM SYSTEM REQUIREMENTS - 20K for vertical curves, 
and 60K for Mass Diagram. Also, Automatic Divide and 
Indirect Address. Source deck can be compiled without 
the use of Automatic Divide or Indirect Addressing. 1620 
with additional 40K card input/output. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092043 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.2.045 

SDEVEY TRAVERSE AN ALYSIS PROGRAM (1620 - 40KJ, 



ADTHOB: 



F. Volzer 



1620-09.2.242 

GEOMETRIC COMPUTATION 

AUTHOR: J. Peterson 

DIRECT TECHNICAL INQUIRIES TO: 
L. H. Morgan 
Computer Engineer 

Washington State Highway Department 
Highways-licenses Building 
Olympia, Washington 

DESCRIPTION - Given distances and bearings of courses, 
this program computes latitudes and departures, coordinates 
and enclosed area. Traverse may be adjusted by compass 
and/or transit rule. Given distances and bearings of 
courses - with distances of two courses unknown, or with 
two bearings unknown, or with one distance and one bearing 
unknown, solves for unknowns. Solves for distances and 
bearings between successively listed coordinates. Given 
circular curve data and stationing, computes the radial 
bearing, or given radial bearing computes the stationing. 
Given Talbot spiral data and - (A). Bearing and coordinates 
of point on line, computes its intersection with spiral 
or offset spiral. (E) . Coordinates of center of curve 
and radius, computes its intersection with spiral or offset 
spiral. (C) . Arc length along centerline, computes point 
on spiral or offset spiral. Given common point data and 
scale factor, converts from cne coordinate system to' 
another. Distances, bearings, and coordinates may be 
stored in cne problem and recalled into another. Plane 
analytic geometry. 98 courses and 100 memory numbers. 
This program is identical with the 40K version except the 
maximum number of courses in the 40K version is 88. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Memory 60K. Card I/O, 
Indirect Addressing, Hultiply-Divide, 3 additional commands 
(BF, TNF, TNS) . 

BASIC EROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092042 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
G. F. Volzer 
Eastman Kodak Co. 
Kodak Park Works 
Engineering Division 
Rochester 4, New York 

DESCRIPTION - Solves and balances a survey traverse if 
within specified limits, or solves for the distance and 
azimuth of the unknown closing course. This program will 
balance the traverse by either Crandall's method (least 
square) or the compass method. The program is limited 
to the traverses with up to and including 75 courses. 

PROGRAMMING SYSTEMS - Written in FORTRAN 90, (change in 
headings would permit use of FORTRAN I). 

MINIMUM SYSTEM REQUIREMENTS - Memory 40K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092045 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 2%z®l=lz.WLk 

LEAST SQUAR ES ADJUSTMENT OF PRECISE SURVEY OBSERVATIONS 

AUTHOR: J. w. Hunter 

DIRECT TECHNICAL INQUIRIES TO: 
J. W. Hunter 

Department of County Engineer 
Advanced Planning Division 
108 w. Second St. 
Los Angeles 12, California 

DESCRIPTION - The Least Squares Adjustment program is 
designed to compute the most probable corrections to a 
system of precise survey observations by the method of 
least squares. Input data is formed from either condition 
or observation eguations. The program will form, store, 
and solve normal eguations, and compute and type out the 
solutions of all unknowns. Its major application will 
be adjustment of 1st and 2nd order horizontal and vertical 
survey control systems. Restrictions - maximum of 60 
conditions eguations with no limit on number of unknown 
corrections, or maximum of 60 unknowns with no limit on 
number of observation eguations. 

PROGRAMMING SYSTEMS - The source program was coded in IBM 
1620/1710 SPS Language. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 - 20K card I/O 
system with MF, TNF, TNS, Auto-Divide, and Indirect 
Addressing hardware. 



CONTRIBUTED PROGRABS 



PAGE 092 1620 

CONTINOED FROB PRIOR PAGE 
EASIC PROGRAM PACKAGE 

DOCUBERTATIOH - Rrite-up on Microfiche only. 
BACHINE READABLE - Hone. 

ORDERING IHFOBHATIOH: PROGRAB ROBBER 1620092046 

Indicate "E S 1" in columns 1-3 and the Progtai Huaber 
in coluans 1-13 on the IBB Prograa Order Fore. 



CONTINOED FROB PRIOR COLOBN 

BASIC PROGRAB PACKAGE 

DOCONENTATIOH - »rite-«p on Bicrofiche only. 
BACHIHE READABLE - Rone. 

ORDERIRG INFORMATION: PROGRAB NDBBER 1620092048 

Indicate "B H 1" in coluans 1-3 and the Prograa Number 
in columns 4-13 on the IBB Prograa Order Fori. 



1620-09.2.047 

1RIGREI - £409, 6420. 6421. i«23 x 6424, 6Jtf5 



16 20-09. 2.049 

ORCORRELATED AHD CORRELATED P OLIH OB 
IglABGOIA TION STRIP 6432 ♦ 6433 



ADJUS1BEHT OF AERIAL 



author: c a. Ring 

DIRECT TECHNICAL INQUIRIES TO: 

c. w. King 

Iranian Oil Operating Coapanies 

p. 0. Box 1065 

Tehran, Iran 

DESCRIPTION - Computes and adjusts a triangulation network. 
Inpnt nay be either bearings or angles, and in grads or 
degrees. Computed either on plane or Laabert projection. 
Output is adjusted coordinates of all points and bearings 
and lengths of all sides. This prograa is designed to 
be used with companion programs, aerial triangulation strip 
formation. File No. 1620 09.2.046 uncorrelated and 
correlated polynomial adjustment of aerial triangulation 
strip. File Ro. 1620- 09.2.049. Restrictions, Range- 
liaited to 27 separate stations of which not more than 
15 Bay be unknowns to be adjusted. Also limited to 18 
directions at any one station. Provision is made to compute 
larger figures in stages. Statement 93 in source prograa 
needs changing for projections other than Lambert, or for 
different false origin. Prograaaed for card input. 

PROGRABBIRG SYSTEBS - Britten in FORTRAR II. 

BINIBUB SISTEB REflUIREflENTS - 60K, Autoaatic Divide, card 
I/O and Indirect Addressing. Conputation in floating point 

with 10 digit mantissa, provision made to check and 
eliminate data errors. 

EASIC PROGRAB PACKAGE 

DOCUMENTATION - write-up on Bicrofiche only. 

HACHIRE READABLE - Rone. 

ORDERIRG IRFORBATIOB: PROGRAB ROBBER 1620092047 

Indicate »B B 1" in columns 1-3 and the Prograa Number 
in coluans 4-13 on the IBH Prograa Order Fora. 



AOTHOR: 



C. a. E. King 



DIRECT TECBRICAL IRQOIRIES TO: 
C. B. B. King 

Iranian Oil Operating Companies 
P. 0. BOX 1065 
Tehran, Iran 

DESCRIPTION - Given the machine coordinates of an aerial 
triangulation strip and the ground coordinates of any 
nuaber of control points, the program will compute 
coefficients of foraulae to adjust the strip to a best 
possible fit to the control points, by the aethod of least 
squares, and then coapute ground coordinates of as aany 
aeasured points in the strip as desired. Ro special 
disposition of control points is necessary, nor is it 
necessary that the initial aodel of the strip shall have 
been absolutely orientated or scaled. Control points do 
not necessarily have to have had all 3 coordinates provided. 
A facility of checking data for faulty control points is 
incorporated - and also a facility to aodify or eliminate 
such points. Output Bay be printed, or punched, or both. 
The coefficients of the foraulae aay be printed out if 
desired. 

PROGRABBIRG SYSTEMS - FORTRAN II Library Floating point, 
and S0.RTF. 

BIHIBOB SISTEB REQUIREMENTS - Card I/O - 60K - Auto-Divide 
and Indirect Addressing. 

BASIC PROGRAB PACKAGE 

DOCOBERTATIOR - Brite-up on Bicrofiche only. 
BACBIRE READABLE - None. 

ORDERING INFOBBATION: PROGRAB NOBBER 1620092049 

Indicate "B N 1" in coluans 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620-09.2^^118 

AER.ISL TEIANGULATION STRIP FOJHATIOH . 



AUTHOR: 



B. King 



1620-09.2.050 

PBESTRESSED GIRDER ANALYSIS AND 
1620 DATA PROCESSING SYSTEB 



DESIGN £R0GRAB FOB THE IBB~ 



DIRECT TECHNICAL IRQUIRIES TO: 
c. N. B. King 
Oil Operating Coapanies 
p. 0. Box 1065 
Tehran, Iran 

DESCRIPTION - conbines successive individual photograaaetric 
aodels into a strip with a coordinate systea having origin 
at the first principal point, and x axis parallel to the 
machine base of the first aodel. Suitable for transforming 
aerial traingulation data from instruments without Zeiss 
parallelogram, and for improving and checking the strip 
coordinates obtained from universal plotters. In this 
specification, the term (pass points) refers to the 
custoaary 6 points per model which are basic in aerial 
triangulation. of these, the two middle points are referred 
to as centre points and the other four as (wing points). 

The program makes a thorough check for errors in all input 
data (see section below) . In addition, it is designed 
to deal with the special circumstances, of steps in (by) 
and (bz) base components, of aissing wing points (as can 
occur along sea coasts) , and of right to left triangulation. 
In this last event, the terms r.h. (right hand) and l.h. 
(left hand) , should be interchanged throughout this 
specialization. All common points to each pair of aodels 
are compares, meaned, and the differences nay be printed 
out. As an optional facility, each model can be given 
a small Omega tilt about the base line and a small z 
correction, to make a best fit in altitude of the three 
common pass points. All heights will be corrected 
accordingly, and these corrections will continue until 
a wing point is encountered with excessive height 
difference. In this event the last successful tilt is 
applied to the remainder of the strip. Further, facilities 
are the options to correct heights for earth curvature, 
either for the strip as a whole, or in the Y direction 
only. A count is Bade of the nuaber of strip coordinates 
formed. The computation is carried out correct to 2 places 
of decimals. Data checks - pass points are checked for 
numbering error, incorrect position, and incorrect 
coordinates, other common points are checked for incorrect 
coordinates. 

PROGRABBING SYSTEBS - Oses FORTRAN II library Floating 
point subroutines. 



aiNIBDH SISTEB REQUIREMENTS - Card I/O 

and Indirect Addressing. 



Auto- Divide 



AUTHOR: 



S. H. Roods 



DIRECT TECHNICAL INQUIRIES TO: 
S. f>. Roods 

State Highway coaaision Of Rise. 
Bridge section 
Madison, Rise. 

DESCRIPTION - This prograa is used to analyze and design 
single span prestressed bridges using a standard 36 inch 
pretensioned girder. The number of strands, shear 
reinforcement, tension reinforcement, and critical stresses 
are given. The program is restricted to 36 inch girders, 
simple spans, standard Aasho loadings, and pretensioned 
girders. 

PROGRAMMING SYSTEBS - The program uses FORTRAR without 
Format so all headings have been written in machine 
language. 

BINIBUB SYSTEB REQUIBEBEHTS - 20K paper tape system. 

BASIC PROGRAB PACKAGE 

DOCUBENTATIOH - Brite-up on Bicrofiche only. 
BACHIRE READABLE - Rone. 

ORDERIRG INFORBATION: PROGRAB NOMBER 1620092050 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Prograa Order Form. 



1620-09.2.051 

T8IN BOX CULVERT DESIGN 



AUTHOR: 



James E. Roods 



DIRECT TECHNICAL INCOIRIES TO: 
Stanley H. Roods 
Bridge Section 

state Highway Commission Of wise. 
Badison, Rise. 

DESCRIPTIOR - Designs a twin box culvert according to the 
Aasho 61 specifications. Top, side and bottoa thicknesses 
are designed separately and a hannch will be placed over 
the center wall when necessary. Output are the dimensions 
and bar table. Fixed end moments and final maximum moments 



CONTRIBUTED PROGRAMS 



CONTINUED FSOH PEIOB PAGE 

and shears are optional items of output controlled by sense 
switch, dements are found by matrix algebra solution of 
slope deflection eguations, sidesway being ignored. The 
approximate maximum span length is 20 feet. Storage used 
by program all-5 programs chained together. 

PROGRAMMING SYSTEMS - 0TO FORTRAN No. 1620-02.0.017. 

MINIMUM SYSTEH REQUIREMENTS - Paper tape system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE BEADABLB - Hone. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620092051 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTINUED FROM PRICE COLUMN 

The series works egually well with rolled beams or welded 
girders ans with constant or variable depth. Articulation 
capabilites are not present. Adaption to other structural 
types may be possible by the user with varying difficulty 
in the separate programs. 

PBOGRAHHING SYSTEMS - Source language is 102 AFIT FOBTBAN. 
Note- The continuous beam XCIX loses accuracy with large 
changes in I/(HL) for different beam elements in a span. 
For this case, or if short elements occur near contraflexure 
points, the use of continuous beam VIII is strongly 
recommended. 

minimum SYSTEM REQUIREMENTS - a card sorter and listing 
device are essential for use of the system. Card I/O, 
Auto-Divide 8 Indirect Addressing. Program III uses the 
most core (20K) . Program VII uses the least core (1698a 
positions) . 



Computer Ctr. 



1S2.0Z09...2.052 

1620 MODEL 4 GEODIHETEB FIELD. NOTE REDUCTION 

AUTHOR: Bocco D. Larizza 

DIRECT TECHNICAL INQDIBIES TO: 
B. L. Kenngott, Supr. 
Chas. H. Sells, Inc. 
409 Manville Bd. 
Pleasantville, N.Y. 

DESCRIPTION - To compute slope distance in feet and meters 
from total sums of readings by AGA Model 4 Geodimeter. 
purposely streamlined for minimum input and output (no 
reduction to horizontal, grid scale, or sea-level). 
Specific Geodimeter calibration tables easily read in at 
execution time, standard for AGA Model 4 Geodimeter. 
all corrections added directly along slope. Atmospheric 
correction by temp. /press, equation. Storage requirements 
are 6660 positions of core. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K SPS, Processor 
1620-SP-02B, Prograa Number Extension CPT1. 

BASIC PBOGBAH PACKAGE 

DOCUHENTATION - Hrite-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBING INFORMATION: PROGRAM HDHBEB 1620092052 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns u-13 on the IBM Program Order Form. 



16.20-09^2^53 

CONTINUOUS B EAM SEBIES ; 

AUTHORS: H. j. Verrill 
D. R. Fields 



PROGRAMS I THRU IX AND XCIX 
R. 1. Hallar 



DIRECT TECHNICAL INQUIRIES TO: 

Halter J. Verrill 
Maine Highway Dept. 
Augusta, Maine 

DESCRIPTION - Programs as referenced by number I eguals 
section properties and stresses - allows design from console 
cf built-up sections, being either any welded beam or any 
of 63 stored standard HP shapes with plates and composite 
action as desired. II eguals section properties - a 
preparatory program for later series use, calculates 
inertias, weights from plate or shape descriptions. Ill 
equals span characteristics and fixed end moments - fixed 
end moments calculated for both unit cone and unit uniform 
loads. IV equals produced moments and influence lines 
- influence lines generated for moments at regular 
intervals, for shears and reactions only at supports. 
V eguals design moments and shears part 1 * a preparatory 
program for VI which rearranges and supplements IV output 
and defines necessary influence point load vectors. VI 
eguals design moments and shears - part 2 - calculates 
at all influence line points, dead load moments and shears 
and live load moments due to lane loading only. VII equals 
live load deflections - calculates deflection at estimated 
position of maximum deflection and at check points 20 feet 
each side of est. mas. point. VIII equals dead load 
deflections - continuous placement of concrete - calculates 
both blocking (for construction) and camber (for 
fabrication) for all designated regular spaced points plus 
up to 3 special points per span assuming concrete placed 
continuously. IX eguals dead load deflections - panel 
placement of concrete - sane as VIII except assumes planned 
sequence of concrete placement in panels. XCIX eguals 
dead load deflections - retained as simple alternative 
to VIII and IX from original series submission. It should 
be noted that programs I, VII, VIII and IX may be also 
most useful in simple span design. The general scope and 
limitations of the series are as follows - *** 13 spans 
with any number of evenly spaced influence points per span 
so that total does not exceed 161. Maximum of 25 different 
elements of length having different moment of inertia per 
span. Maximum of 25 evenly spaced deflection points in 
any span but these need not be the same as influence points. 
Programs specifically written for steel-concrete 
construction of the following types, (1) non-composite, 
(2) normal composite, (3) composite but with full support 
of steel and liguid concrete by falsework and (4) composite 
but with support of liguid concrete only by false work. 



BASIC PROGRAM PACKAGE 

DOCUHENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620092053 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.2.057 

COMPOSITE BEAM SERIES 



SERIES Z PROGRAMS I AND II 



AUTHOR: 



E. Peary, Jr. 



Chief Programmer 



DIRECT TECHNICAL INQUIRIES TO: 

Halter J. Verrill, PE, 
Maine Highway Dept. 
Augusta, Maine 04330 

DESCRIPTION - Selects a potentially competetive list of 
welded I sections and/or rolled HF beams and completes 
their design, or analyzes a given HF beam design. In 
analysis, the input section remains fixed, but for either 
design or analysis the design details are completed. Fifty 
common HF beams from 18 to 36 inches as well as 10 welded 
sections from 39 to 51 inches are stored in replaceable 
memory. Output gives complete designs including; cover 
plate, wt per foot, moments of inertia, stresses, reactions 
shear connector spacings, weld sizes, moments and 
deflections. Program accepts any Aasho loading or fraction 
thereof as well as no live load. Opportunity exists for 
coding special distribution factors and additional loads. 
Some limitations on distribution and span exist but 
generally the program functions properly from spans of 
38 to 120 feet and any number of traffic lanes for stringer 
spacings up to 10 feet. Program contains provision for 
handling special cases involving altered modular ratios, 
cover plate width, maximum cover plate thickness, etc. 
with ease. Average total time per beam solution is slightly 
under one minute thru both programs not including program 
load times. Output is fully identified. (1) Revision 
of cover plate length determination to conform to AHS 
specification 2.0-63. (2) Extension of the logic to handle 
A441 steel. (3) Recompilation of the series in PDQ. (4) 
More complete output and elimination of minor 
inconsistencies in the combination of certain output data. 

programming systems - PDQ FORTRAN, General Library Program 
1620-02.0.013. 

MINIMUM SYSTEH REQUIREMENTS - Card system with Auto-Divide, 
storage used by program - I eguals 19,985 positions. II 
eguals 19,809 positions. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092057 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620 = 09.2.058 

DETERMINATE TBUSS ANALYSIS 

AUTHOR: David S. Heindel 

DIRECT TECHNICAL INQUIRIES TO: 
David s. Heindel 
Dravc corp. 
Neville Island 
Pittsburgh, Pa. 15225 

DESCRIPTION - Program solves a simple, statically 
determinate, pin-connected truss for the support reactions 
and axial stress in each member. Truss is defined by 
giving the coordinates of each joint and listing members 
connecting these joints. The structure may be statically 
loaded at any of the joints. Program is limited to trusses 
that can be analyzed by the method of joints. A maximum 
of 245 members can be used. Any number of loading 
conditions can be treated without rereading the truss 
configuration. Output nay be either punched or typed. 



PROGRAMMING SYSTEMS - Written in PDQ FORTRAN. 
includes PDQ free form subroutines. 



Object deck 



CONTRIBUTED PROGRAMS 



CONTINUED PROM PBIOB PAGE 

HIHIHUM SYSTEM REQUIREMENTS - Storage used by program - 
40K. Card system, Auto-Divide. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092058 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^09^2^59 

NON-PBISHATIC NON SY METRICAL filglj) FRAME ANALYSIS 



AUTHORS: R- 



Provse 



L. Dibernardo 



DIRECT TECHNICAL INQUIRIES TO: 
R. J. Provse 
Eridge Division 
Computet section 
N. H. Dept. P. H. 6 Hwys. 
85 Loudon Rd. 
Concord, N.H. 

DESCRIPTION - This program permits the designer to quickly 
obtain an analysis by virtual work, of a 2 hinged non- 
prismatic nonsymmetrical rigid frame with or without an 
earth loading over the desk. For the analysis, the 
structure is divided into 31 DS divisions. Fifteen of 
these are in the deck and eight are in each leg. In the 
first pass, the geometry of the structure and various 
functions such as elastic area, distance to elastic 
centroids, and dead loads are computed for each DS division. 
Pass 2 computes the simple moment table, the moment 
distribution, the influence line table, the moments due 
to earth pressure on each leg, and determines the trust 
at each hinge. The input to this program consists of the 
frame dimensions, the height of fill over each end, and 
the elevation of both hinges, significant labels are shown 
on the longitudinal section sketch of a typical frame. 



PROGRAMMING SYSTEMS - Used in the writeup: 
FORTRAN. 



A.F.I.T. 



MINIMUM SYSTEM REQUIREMENTS - Basic card, 20K, IBM 1620 
system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092059 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



1620-09^060 

SX-1.01 - TRAVERSE AXIS 



AUTHOR: 



M.S. Anderson 



DIRECT TECHNICAL INQUIRIES TO: 
c. L. Palmer 
City Engineer 
City of Detroit 
528 City-County Building 
Detroit 26, Michigan 

DESCBIPTION - Modification to the Traverse Analysis Program 
by D.T. Mitchell, 9,02.05/Tape. This program will not 
balance a traverse. It compute all traverse data including 
the three (3) types of intersections. Directional input 
may be in azimuths, bearings, deflection angles, interior 
or exterior angles. Output in bearings or azimuths. 
Selective output is optional. Curve data is computed and 
stored. 96 courses may be computed and stored for 
interdependent traverses. Distances and angles may be 
divided. Angles may be added or subtracted. Radial points 
may be set. Go normal to computed lines. Stored 
information may be referenced. Output on typewriter or 
in paper tape for offline listing. Entire 20K core 
equipment is required by program — Paper tape system. 
Programming type-SPS. Program may be modified for a card 
system with only minor changes with a savings of 
approximately 292 locations. The changes consist of reading 
and writing cards instead of paper tape. A list of 
modifications for cards is included. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092060 

Indicate W E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1621=0^2^061 

TRANSMISSION POWER DESIGN 



CONTINUED FROM PRIOR COLUMN 

V. A. Lippo 

West Pennsylvania Power Co. 

Cabin Bill 

Greensburg, Pennsylvania 15602 

DESCRIPTION - Designs a double-circuit transmission tower 
with known dimensions to withstand loads determined by 
the conductor and static wire sizes specified in input. 
The tower must be composed of statically determinate trusses 
in the transverse and longitudinal faces. The tower is 
designed in one of three materials as selected by the user. 
The tower may have a rectangular or square base and be 
one of four tupes- suspension, anchor, angle, or dead-end. 
Stress analysis by (Method of Joints) . Design by standard 
design criteria and formula. Tower with 110 members per 
face maximum. Fixed point. Storage used by program- 40K. 
Equipment required - Card I/O and Auto-Divide. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092061 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.2.062 

HORIZONTAL CUJVE DATA 

AUTHOR: J. H. Naldner 

DIBECT TECHNICAL INQUIRIES TO: 
G. Woodruff 

N. J. State Highway Department 
1035 Parkway Avenue 
Trenton, New Jersey 

DESCBIPTION - Given the radius of a curve and the bearings 
from the center to the beginning point and ending point 
of the curve, the program computes the central angle, 
length of arc, length of tangent, external distance, and 
deflection per foot of arc for the curve. Given the 
beginning station of the curve in addition to the above 
information, the program computes the deflection angles 
to each even 25 foot station around the curve, and to any 
odd station for which a delection is desired. Method- 
plane geometry and trigonometry. Restrictions- Stations 
up to 999699.999 may be given as input, but program computes 
stations above 1000700.000 if necessary. Storage used 
by program- approximately 8000 positions. Equipment 
required by program- card system, TNS, TNF, MF, Auto Divide, 
Indirect Addressing. Programming type- SPS - 1620/1710, 
Mainline, complete. Output is edited so it can be listed 
on standard eight and one half inches by eleven inches 
paper on a 407 using an 80/80 List Board. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092062 

Indicate "B N 1 H in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.2.063 

DEFLECTIONS IN HINGED SPANS BY THE CONJUGATE BEAM METHOD 

AUTHOR: S. W. Woods 

DIRECT TECHNICAL INQUIRIES TO: 
S. w. Woods 

State Highway Commission of Wisconsin 
Madison, Wisconsin 

DESCRIPTION - This program computes delections in hinged 
spans by the conjugate beam method. The load may be uniform 
load with end moments known, or a variable load and the 
complete moment envelope known. The moment of inertia 
may be constant or variable. Storage used by program- 
20K. Equipment required- paper tape I/O. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION. - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092063 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^9^2.067 

CONTINUOUS BEAM LIVE LOAD DEFLECTIONS 



AUTHOR: R. L. Patterson 
DIRECT TECHNICAL INQUIRIES TO: 



AUTHOR: S. W. Woods 

DIBECT TECHNICAL INQUIRIES TO: 
S. W. Roods 

State Highway commission of Wisconsin 
Bridge Section 
Hadisoh, Wisconsin 

DESCRIPTION - This program computes the live load 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

deflections in each span of a continuous bean and prints 
the maximum value, its location, and the location of the 
wheel causing maximum delection foe AASHO loadings. 

PROGRAMMING SYSTEMS - He it ten in FORTRAN. 

MINIBDH SYSTEM REQUIREMENTS - A 20K 1620 paper tape system. 

BASIC ERCGRAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092067 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Progran Order Form. 



CONTINUED FROM PRICE COLUMN 

DESCRIPTION - A plug deck for use with COGO I to provide 
for computing coordinates along a given spiral, tc intersect 
a straight line with a spiral and to intersect a circular 
curve with a spiral. Storage used by program is the normal 
space occupied by COGO plugs. 

Equipment required by program - Card 1620 Model I. 
Programmed in COGO FORTRAN with COGO Compiler. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE READABLE - None. 
ORDERING INFORMATION: PROGRAM NUMBER 1620092071 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620^09^2-169 

GENERALIZE 



D SAG AND TENSION CALCULATIONS 



1620-09.2.072 

GRAVITY LOAD ANALYSIS PROGRAM 



AUTHORS: D. D. Williams J. A. Rodgers 

DIRECT TECHNICAL INQUIRIES TO: 
D. D. Williams 

Baltimore Gas S Electric Company 
Engineering Computer Applications Group 
Electric Engineers Department 
Baltimore, Maryland 21203 

DESCRIPTION - Determines the values of sags and tensions 
for various span lengths, wire types and sizes, loading 
conditions and relative temperatures. The volume of 
punched-card output is directly proportional to the ranges 
of the variables of the input data. A table of values 
is printed from the card output, from which the user can 
choose the sag values for the known tensions - or vice 
versa - at various relative temperatures. A single-pass 
execution of a batch of problems is the method. 
Approximately 18,000 positions of storage are used by the 
program. 



Equipment required by progran 
Divide, Indirect Addressing, 



Programmed in PDQ FORTRAN. 



is: Card 1620 with Auto- 
1620 Model I. 



This program also monitors the limiting values of SAG, 
can be used to examine behavior with temperature changes 
of installed wire and can examine behavior of installed 
wire with two levels of additional weight on wire. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092069 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOR: 



Dr. B. 



Ismail 



DIRECT TECHNICAL INQUIRIES TO: 
L. L. Bathurst 
Rush Engineering Company 
Birmingham, Alabama 

DESCRIPTION - These programs are an addition to the Rust 
Automated Building Design System. They provide capability 
for framework interaction analysis under vertical dead 
and live load. Provision is made for missing beams, 
columns, through girders. All operations are dependent 
on and consistent with the other operations (Geometry 
description, load allocation, member selection, output) 
of the Automated Building Design System. Gravity load 
analysis is relatively fast, compared to the original 
portal analysis option; but it cannot handle lateral 
loading. Six cases of vertical dead and live load may 
be considered and combined at will. 

PHOGHAMMING SYSTEMS - Written in- FORTRAN II-D, 1 Main, 
1 Link, 4 subroutines. The sample problem can only be 
executed if the Automated Building Design System is 
available. 

MINIMUM SYSTEM REQUIREMENTS - A 60K card system with two 
disk packs, TNS, TNF, MF, Auto Divide, Indirect Addressing, 
and a 1413 Printer. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
HACHINE READABLE - None. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092072 

Indicate M B N 1" in columns 1-3 and the P*gogram Number 
in columns 4-13 on the IBM Program Order Form. 



1620x.BJL2_.070 

ROADWAY ELEVATIONS 



AUTHOR: 



P. R. Schopfer 



a point on a roadway 

theoretical grade 
n of the theoretical 
capable of handling 

roadway or four 
a dual roadway, 
nine vertical 
itioning can be 



DIRECT TECHNICAL INQUIRIES TO: 
B. L. Kenngott 
O H. Sells, Inc. 
409 Manville Road 
Pleasantville, New York 

DESCRIPTION - Computes the elevation of 
defined by its station and offset from a 
line. It will also compute the elevatio 
grade line at the given station. It is 
up to four lanes of pavement for a singl< 
lanes of pavement in each direction for 
The program can store and utilize up to 
curves and seven horizontal curves trans 
set at any lane edge. 

PROGRAMMING SYSTEMS - Written in FORTRAN with FORMAT. 

MINIMUM SYSTEM REQUIREMENTS - 20K memory 1620 Model I. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092070 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBS Progran Order Form. 



1620-09.2.071 

SPIRAL PLUG DECK TO COGO I 



AUTHOR: p. R. Schopfer 

DIRECT TECHNICAL INQUIRIES TO: 
E. L. Kenngott 
c. H. Sells, Inc. 
409 Manville Road 
Pleasantville, New York 



1620-09.2.073 

T RAVE RSE ANALYSIS PROGRAM 

AUTHORS: Mr. Robert Leabow Mr. John J. Stump 

DIRECT TECHNICAL INQUIRIES TO: 
Mr. Robert Leabow 
Los Angeles County 
Department of County Engineer 
Advanced Planning Division 
108 Nest Second Street 
Los Angeles 12, California 

DESCRIPTION - This program will solve the majority of the 
problems which arise in traverse computations. These 
include- error of closure, area, unknown bearings and 
lengths, traverse adjustment, interdependency between two 
or more traverses, and curve data including segment areas, 
interior angles, arc length, and semi-tangent length. 
96 courses maximum can be handled for any one traverse. 

PROGRAMMING SYSTEMS - 1620/1443 SPS III. 

MINIMUM SYSTEM REQUIREMENTS - 20K IBM 1620 with Automatic 
Divide, Indirect Addressing, TNF, TNS, MF, 1622 Card Read 
Punch, 1443 Printer (optional). 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092073 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



1620-09.2.074 

EARTHWORK PLOT 



AUTHORS: Mike Vandeman 



M. C. Williamson 



DIRECT TECHNICAL INQUIRIES TO: 
Lloyd H. Morgan 
Washington state Highway Dept. 



CONTRIBUTED PBOGBAMS 
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Highway-License Bldg. 
olympia , Washington 

DESCRIPTION - The program takes cross-section and template 
readings and plots the points according to a previously 
specified scale. Cross-sections nay be plotted without 
tenplates. Station number and the elevation at the cross- 
section centerline are printed with each station. Each 
job prints a heading with data taken from a transnittal 
card. Storage used- 40K. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Card system with TBS, TNF, 
HP, Auto Divide, Indirect Addressing and a calconp Plotter 
1627. 

BASIC EBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - Bone. 

ORDERING INFORMATION: PBOGEAM NUMBER 1620092071 

Indicate "E II 1" in columns 1-3 and the Program Number 
in coluans 4-13 on the IBM Progran Order Form. 



CONTINUED FBOM PBIOB COLUMN 

DESCRIPTION - Evaluates pressure and flow of incompressible 
media in pipe networks. Autoaatic set-up of tree and 
loops. Subroutine techniques for easy modification of 
applicable law of resistance. Hardy cross iterative scheme. 

PROGRAMMING SYSTEMS - Written in 1620 FOBTBAN II. 

MINIMUM SYSTEM REQUIREMENTS - 

- IBM 1620 with 60,000 core storage positions for 
networks with up to 400 pipe sections. 

- IBM 1620 with 40,000 core storage positions for 
networks with up to 100 pipe sections. Limits 
can be extended by multiphase execution. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 



ORDERING INFORMATION: PROGHAB NUMBER 16218092078 



PROGRAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 
REQUIREMENT 



1620^9.2^075 

SP IRAL C.URJB LAYOUT 

AUTHORS: Francis J. Perry Robert Wilkinson 

DIRECT TECHNICAL INQUIRIES TO: 
Francis J. Perry 
Computer Section 
Dept. of Public Works 
244 State Office Bldg. 
Providence, R. I. 02903 

DESCRIPTION - This program accepts the definition of a 
spiral highway curve, and calculates the necessary data 
(deflection angles and chords) for the layout of the spiral 
and two parallel lines in the field. The parallel lines 
may be any distance froa the spiral, and on either side. 
Storage used- 20,000 positions. 



OPTIONAL none 



PROGRAMMING SYSTEMS 
{General Library No. 



■ Programmed in AEIT Improved FORTRAN 
1.1.010). 



MINIMUM SYSTEM REQUIREMENTS - Card system with Auto-Divide 
and a Model I. Auto-Divide can be easily removed. 

BASIC EBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092075 

Indicate "B N 1" in columns 1-3 and the Program Number 
in coluans 4-13 on the IBM Program Order Form. 



1620-09.2.079 » 

WELDED STEEL COMPOSITE BEAM DESIGN 

AUTHOR: Mr. B. Wright 

DIBECT TECHNICAL INQUIRIES TO: 
Mr. G. Latourneux 
Oregon State Highway Dept. 
Data Processing section 
Salem, Oregon 

DESCRIPTION - Picks the most economical set of flanges 
for a simply supported welded steel beam composite with 
a concrete deck. Other detailing information is also 
furnished; AASHO specifications used. Flanges taken froa 
tables which can easily be modified. The structural steel 
used may consist of either A36 steel or Low Alloy, A441. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model I, 40K, card I/O, 

TNS, TNF, MF, Auto Divide, Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092079 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



.1620=09^.2^077 

COGO PICT CC ADDITIONAL COGO SUBROUTINES 



Charles I. 
Edward E. 



Miller 
Newman 



John G. Skcdon 



DIRECT TECBNICAL INQUIRIES TO: 
Edward E. Newman 
Room 1-147, MIT 
77 Massachusetts Avenue 
Cambridge, Mass. 

DESCRIPTION - Plot COGO is an extension of COGO providing 
the capability of displaying graphically on an IBM 1627 
or a Calcomp Plotter the coordinate points computed with 
the COGO system. The points may be displayed with or 
without annotation and with or without connecting straight 
or circular lines. The commands to perform these 
operations, like the COGO commands, are problem-oriented. 
Storage used by program- 10800-17280 positions. 

PROGRAMMING SYSTEMS - Programmed in SPS II-D. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Model I, 20K, card I/O, 
1627 Plotter. 

BASIC PBCGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620092077 

Indicate "B N 1" in coluans 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.2.078 

IR1SSURE AND FLOW RATES IN GAS AND WATER NETWORKS 



1620 r 09.2.081 

VERTICAL ALIGNMENT AND STAKEOOT 

AUTHOR: Mr. Max Noach 

DIRECT TECHNICAL INQUIRIES TO: 
Max Noach 

Chas. H. Sells, Inc. 
409 Manville Road 
Pleasantville, New York 10570 

DESCRIPTION - Computation of vertical allignment data; 
high point, low point, PC, PT, Stopping or Head Light Sight 
Distance, from given PVI's and elevations or grades. 
Computation of elevations at random points along the 
alignment, together with differences in elevations in case 
stake elevations are given at those points; cut and fill 
computed in decimal feet and in feet, inches and 8th of 
inches. Standard Parabolic Vertical Alignment Curves; 
Sight Distances according to New York State Department 
of Public Works specifications. Range- starting station, 
13 (thirteen) PVI*s and an ending Station in one alignment. 



20K 1620 Model I card system 
PROGRAMMING SYSTEMS - Programmed in FORTRAN with FORMAT. 



MINIMUM SYSTEM REQUIREMENTS 

and a printing device. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up 
MACHINE READABLE - None. 



on Microfiche only. 



ORDERING INFORMATION: PROGRAM NUMBER 1620092081 



Indicate M B N 1 M in columns 1-3 and the program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOBS: N. H. Everling V. Igney 

DIRECT TECHNICAL INQUIRIES TO: 
w. h. Everling 
IBM Deutschland 
7032 Sindelf ingen, Germany 



1620209^22. 



SYNCHRONIZING TRAFFIC SIGNALS FOR AXIMAL ANSWITH 



AUTHORS; J. D. C. Little 
B. 0. Martin 



J. T. Morgan 



CONTRIBUTED PROGRAMS 
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DIRECT TECHBICAL IBQUIBIES TO: 
Dr. J. D. C. Little 

Massachusetts Institute of Technology 
Sloan School of Hanagenent 
Cambridge, Mass. 02139 

DESCBIFTION - synchronize signals for maximum equal 
bandwidths in each direction, given nunber of signals on 
a street, common cycle length, green and red tines and 
specified vehicle speeds. Adjust synchronization to 
increase one bandwidth to some specified feasible value 
and maintain others as large as possible. Plots bandwidth 
of 10 signals on an 11 inch plotter. Method: nixed 
integer-continuous variable algoritha. Bestriction: 50 
signals. 

PRCGBAMNIBG SYSTEMS - Britten in FOBTSiH without FOBBAT. 

minimus SYSTEM REQ.UIREBENTS - 20K, card reader, plotter. 

BASIC PBOGBAB PACKAGE 

EOCOBEBTATIOH - Write-up on Bicrofiche only. 
BACBIBE READABLE - Hone. 

OBDEBING INFOBBATIOB: PBOGBAB BDBBEB 1620092082 

Indicate "E M 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620-09.3.006 

ASTB-TO-TBP AND TBP-TO-ASTB DISTILIATIOB COBVEBSIOHS 

AUTHOR: 0. K. Biniato 

DIBECT TECBBICAL INQUIRIES TO: 

0. K. Biniato 
Shellburn Befinery 
201 Kensington street 
Burnaby 2, B. C, Canada 

DESCBIPTIOH - To Convert the I.B.P., 10*, 30X, 50*, 70*, 
90* distilled and E.p. of an ASTB distillation curve to 
the corresponding points on a T.B.P. curve, and vice versa. 
Uses correlations published by s. C. Edmister and K. K. 
okaaoto in August, 1959, issue of Petroleum Befiner. Tape 
system, memory 20K are reguired. 

BASIC PBOGBAB PACKAGE 

D0C0BEHTATI0B - Write-up on Bicrofiche only. 
BACHIHE READABLE - None. 

ORDERING INFOBBATIOB: PBOGBAB BDBBEB 1620093006 

Indicate "B N 1 M in colunns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620-09.3.011 



1620-89^2^83 

THE SELECTION OF J CYCLE IIBGTB FOB FIXED JIBE TRAFFIC 
SIGNALS 



AOTBOBS: A. J. Bone 

B. V. aartin 



H. Barvey 



DIBECT TECHNICAL IHQOIBIES TO: 
T. B. Barvey 
BIT 

Boom 1-223 
Cambridge, Mass. 

DESCBIFTION - Calculates delay by Bebster method, parameters 
for probability of arriving vehicle clearing intersection 
on first green phase and parameters for determining maximum 
expected gueue also compute average gueue. Bestrictions: 
Analyses intersections in isolation; limited to two phase 
operations (may be modified) ; cannot deal with saturation 
conditions. 



PEOGBABBIBG SYSTEMS 
and FOETBAB II. 



Programmed in FCBTBAB with Format 



BINIBDM SYSTEM REQUIREMENTS - load and Go FOBTBAB 13K; 
FOBTBAB II 10K. 

BASIC EBOGBAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACBIBE BEADABLE - None. 



ADIABJTIC FLAME TEMPERATURE. NO DISSOCIATION 



AUTHOR: 



B. Kerr 



DIRECT TECHNICAL INQUIRIES TO: 
B. B. Kerr 
Box 21 

Tennessee Polytechnic Institute 
Cookeville, Tennessee 

DESCBIFTION - This program was designed to compute the 
adiabatic flame temperature for the combustion process 
using a large amount of excess air (such as in the 
combustion turbine) where the flame temperatures are low 
enough (below 3000 F) so as to have a negligible amount 
of dissociation in the products of combustion. The program 
is designed so that any hydrocarbon having a known enthaply 
of formation may be run, with any amount of excess air. 
The flame temperature is assumed independent of pressure. 
Memory 20K (card 1620) , no special features reguired. 
Program written in FOBTBAB with Format. 

BASIC PBOGBAB PACKAGE 

DOCOMEBTATICB - »rite-up on Microfiche only. 
BACBIBE READABLE - Bone. 

ORDERING IBFOBBATIOB: PBOGBAB BDBBEB 1620093011 

Indicate "B B 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



OBDEBING INFORMATION: PBOGBAB NUBBEB 1620092083 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IEB Program Order Form. 



1620-09.2.881 *j 

GENERALIZED STACK - VIBRATION CALCULATIONS BASED OB 
SiHIJGHrJITZ FOMOLAJ 

AOTHOBS: Mr. D. D. Billiams Br. J. A. Bodgers 

DIBECT TECHNICAL INQUIRIES TO: 
Br. D. D. Billiams 
Ealtimore Gas S Electric Co. 
Analysis £ Systems Engr. 
Electric system planning Dept. 
Baltimore, Maryland 21203 

DESCRIPTION - Program calculates the Fundamental Freguency 
and freguency of the First Barmonic, in cycles per second 
for the vibration of a cylindrical and/or conical shaped 
stack comprised of a metal-plate shell with or without 
2 lining. The thickness of plates and lining nay vary, 
from tier to tier, except for any conical-bank which is 
of constant thickness. Examples given are for steel and 
gunize stacks. Use proper Moduli and unit weight for other 
material. Range: The program calculates the root-values 
between .0000001 ft. to XXXXXXX. ft. 

PBOGEABBING SYSTEBS - Britten in FOBTRAN EDO. 

MINIMUM SYSTEM REQUIREMENTS - 20K 1620 card system with 
Auto divide and Indirect Addressing. 

BASIC PRCGRAB PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
BACHINE BEADABLE - None. 

OBDEBING INFCEMATIOB: PBOGBAB BDBBEB 1620092081 

Indicate "E B 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1£20 = 09_.3_.012 

THIELE^GEDDES METHOD FOB MJLTICOMPOBEBT DISTILLATION 

AOTHOB: Anthony J. Capato 

DIBECT TECHNICAL IBCOIBIES TO: 

Anthony J. Capato 

Department of Chemical Engineering 

Columbia Dniversity 

New York 27, New York 

DESCBIPTIOB - This program uses the Thiele-Geddes method 
to perform plate to plate material balances in a 
distillation column with a specified number of plates. 
The method makes the following simplifying assumptions: 
1. Constant molal overflow from plate to plate. 2. 
Eguilibrium is established on each plate. Approximately 
36,000 digits. 

PBOGBAMBIBG SYSTEBS - Britten in FORTRAN I with Format. 

MINIMUM SYSTEM BEQUIBEMENTS - IBM 1620, 10K core memory, 
1622 Card Beader and Punch. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PRCGBAM NUMBER 1620093012 

Indicate M B N 1" in columns 1-3 and the Progran Number 
in columns 1-13 on the IBM Program Order Form. 



1620-09^.3.013 

LOB AND MEDIOM PBESSURJ GAS BETBOBK ANALYSIS PROGRAM 



AUTHOR: 



Br. J. F. Aldrich 



DIRECT TECHBICAL INQUIRIES TO: 
Mr. J. F. Aldrich 
Niagara Mohawk Power Corp. 
300 Erie Blvd. Best 
Syracuse 2, New York 

DESCRIPTION - The need for a method of studying a gas 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

distribution network has long been recognized, and several 
programs have already been written to handle this type 
of problem, all of these programs are quite similar, most 
of them employing the Modified Hardy-Cross Method solution. 
However, in almost every case the task of data preparation 
is overwhelming for all but the simplest networks. The 
purpose of this program is not only to provide a means 
for solving as large a network as possible, but also to 
overcome as many of the data collection problems as 
possible. This program has been written in eight parts 
for the IBS 1620 card system with 40,000 digit core storage 
Any low or medium pressure system of up to 3000 mains can 
be solved. Any number of closed loops may be used to 
describe the system. 

MINIMUM SYSTEM REQUIREMENTS - An IBM 1620 card system with 
40,000 digit core storage. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - Hone. 

ORDERING IKFOBMATIOti: PBOGBAM NUMBER 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTINUED FROM PBIOB COLUMN 

G. L. Cunningham 

Eastern Illinois University 

Charleston, Illinois 61920 

DESCRIPTION - This program calculates the three coefficients 
for the Antoine vapor pressure equation by the method of 
D. G. Miller, using a least-squares fit to the linearized 
equation, with iteration on C. Up to 120 pairs of pressure- 
temperature measurements may be employed. The calculated 
values of P and log (P) may be typed or punched for 
comparison with the input data. By a hunting process, 
a value of the non-linear constant, C, if found for which 
the sum of squares of deviations from the linearized 
equation is a minimum. Storage used by the program- 19,750. 
Equipment- card system, 20K core, no special features. 
Britten for AFIT FORTRAN. The program employs the free- 
form input Of AFIT FORTRAN. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGRAM NUMBER 1620093016 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620_;09_3. 0J 4 

EQUIVALENT PIPE LJJGTHS 

AUTHOR: J. F. Aldrich 

EIRECT TECHNICAL INC.OIBIES TO: 
J. F. Aldrich 
Niagara Mohawk Power Corp. 
300 Erie Blvd., Nest 
Syracuse 2, New York 

DESCRIPTION - This program is intended as a preliminary 
to the "Low and Medium Pressure Gas Network Analysis* 1 
(1620-09.3.013). It performs the necessary calculations 
to reduce complex mains composed of several lengths of 
various sized pipe to an equivalent length and diameter 
as required by the load flow program. Output is the 
"permanent main data" required by the load flow progran. 
Machine requirements - 40K card system with Indirect 
Addressing. Program language - SPS I (excess 50 Floating 
Point) . 

BASIC EBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620093014 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20-09. 3.018 

COMPUTATION OF EQUILIBRIUM COMPOSITION AND TEMPERATUBE OF 
CHEMICAL REACTIONS 



AUTHORS: 



Heads 



McGowan 



DIRECT TECHNICAL INQUIRIES TO: 
H. E. Meads 

Baltimore Gas and Electric Co. 
Baltimore, Hd. 21203 

DESCBIPTION - Computes the equilibrium conditions for the 
combustion of any hydrocarbon in air or in any oxygen- 
nitrogen mixture of a given ratio. Uses method devised 
by Huff, Gordon ana Morrell (1) involving solution of 
equations simultaneously by successive iterations. 
Restricted to adiabatic combustion processes in which the 
total number of elements and compounds does not exceed 
7 and 13, respectively. Thermodynamic Functions Program 
is restricted to use with the Table of Coefficients included 
with the writeup. Equipment required: 20K card system. 
Written in PDQ FOBTBAN with Format. 

BASIC PROGEAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620093018 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20-09_3_J15 

CALCULATION OF VAN LAAR CONSTANTS ±JJ! VAPOR LIQUID 

EQUILIBRIUM FROM AZEOTROPE DATA 

AUTHOR: G. L. Cunningham 

DIRECT TECHNICAL INQUIRIES TO: 
G. L. Cunningham 
Eastern Illinois University 
Charleston, Illinois 

DESCRIPTION - This program calculates the equilibrium vapor 
pressures, vapor composition, and liquid-phase activity 
coefficients for a binary system which forms an azeotrope, 
at intervals of 0.05 mole fraction, from one measurement 
of the azectrope composition, temperature, and pressure. 
The boiling point: composition diagram is also calculated 
at 760 mm. or any selected pressure. The Van Laar constants 
for the system are determined at the azeotrope and then 
used to calculate the activity coefficients and vapor 
pressures at each concentration. The liquid phase must 
be homogeneous- two immiscible liquid phases invalidate 
the calculation. Accuracy is limited to the extent to 
which the assumptions of the Van Laar equation apply. 
Storage used - 20K. Equipment required - card I/O. Written 
in FORTRAN with Format. This program was written for AFIT 
FOBTRAN, but may be compiled on FORTRAN with Format with 
minor format changes. The ABS Subroutine is used, but 
may be bypassed by a simple modification. 

BASIC PROGRAM PACKAGE 

EOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

CBDEBING INFORMATION: PROGRAM NUMBER 1620093015 

Indicate "E N 1" in columns 1-3 and the Progran Number 
in columns 4-13 on the IBM Program Order Form. 



162£^9 i 4__0j4 

SELECTION OF ECONOMIC CONDUCTOR SIZE (SPECIFIC CR£E NEH 
JNGLftND SYSTEM EBOGBAM #J8]_ 



AUTHOR: 



8. H. Snow 



DIRECT TECHNICAL INQUIRIES TO: 
B. H. Snow 

New England Electric System 
245 South Main Street 
Hopedale, Massachusetts 

DESCRIPTION - Given installed costs, resistances, a load 
forecast, unit loss costs, and other pertinent data, this 
program calculates cumulative present worth of total annual 
costs for any four conductor sizes, and prints these costs 
for each year for a period not exceeding 20 years, on a 
1000 wire-foot basis. Results are presented in tabular 
form and may easily be transferred to a graph, if desired. 
About 3000 memory locations are required, exclusive of 
tables and subroutines. 



MINIMUM SYSTEM REQUIREMENTS 
Punch. 



A 1620, 20K, 1622 Card Read 



BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094004 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620r0.9i4_.006 

SHOBT CIRCUIT ANALYSIS 



1620-09.3.816 

LEAST SOJURES FIT OF VAPOR PRESSURE DATA BY THE ANTOINE 
EQUATION 

AUTHOR: G. L. Cunningham 

DIRECT TECHNICAL INQUIRIES TO: 



AUTHOR: 



G. S. Haralampu 



DIRECT TECHNICAL INQUIRIES TO: 
G. S. Haralampu 
New England Electric System 
441 Stuart Street 
Boston 16, Massachusetts 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

DESCRIPTION - This program is to be used for the 
determination of current distribution constants, bus 
voltages, and i/R ratios under faulted conditions. This 
program is a one pass prograie, and complex network 
impedances are used. 

MINIMUM SYSTEH REQUIREMENTS - A 1620, 20K, 1622 Card Read 
Punch. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094006 

Indicate "E N 1" in columns 1-3 and the Program Number 
in. columns 1-13 on the IBM Program Order Form. 



SHOU CIRCUIT CALCULATIONS 

AUTHOR: G. s. Haralampu 

DIRECT TECHNICAL INQUIRIES TO: 
G. s. Haralampu 
New England Electric System 
141 Stuart Street 
Boston 16, Massachusetts 

DESCRIPTION - This program is to be used for the 
determination of current distribution constants, bus 
voltages, X/R ratios, and impedances to the point of fault, 
under faulted conditions. The program accommodates a 
system of 80 buses and 119 lines and is done in three 
passes, complex impedance networks are used. 



1620 PAG 

CONTINUED FROM PRIOR COLUMN 

ORDERING INFORMATION: PROGRAM NUMBER 1620094009 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09. jj^fllj 

POWER PRODUCTION COST 



AUTHOR: 



R. L. Patterson 



MINIMUM SYSTEM REQUIREMENTS 
Punch. 



A 1620, 



0K, 1622 Card Read 



DIRECT TECHNICAL INQUIRIES TO: 
R. L. Patterson 
Best Penn Power Company 
Cabin Hill 
Greensburg, Pennsylvania 

DESCRIPTION - The purpose of this program is to sort given 
station power blocks in ascending incremental cost order, 
to integrate a load duration curve using the sorted power 
blocks to determine base megawatt-hours, variable megawatt- 
hours, and cost of the variable megawatt-hours. Ease fuel 
and output maintenance costs can be applied to determine 
the base fuel and variable fuel cost. 

PROGRAMMING SYSTEMS - Written in machine language. 

MINIMUM SYSTEH REQUIREMENTS - A 1620 tape system with 
Automatic Divide. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094011 

Indicate "B N 1" in columns 1-3 and the Prograie Number 
in columns 4-13 on the IBM Program Order Form. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094007 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



TRANSMISSION LOSSES AND PENALTY FACTORS 

AUTHOR: D. Hayward 

DIRECT TECHNICAL INQUIRIES TO: 
D. Hayward 

New England Electric System 
441 Stuart Street 
Boston 16, Massachusetts 

DESCRIPTION - This program will figure generated power, 
losses and received power and the penalty factor at each 
entry point of the system represented by the B-constant 
matrix. It does not ficure the B-cknstants. They must 
be available to use the program. The program is limited 
to a 28 by 28 B-constant matrix. 



MINIMUM SYSTEM REQUIREMENTS 
I/O. 



A 1620 with 20K and card 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094008 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 = 01.4. s _012 

TEANSFORMER RATING FOB NORMAL AND EMERGENCY OPERATION 

AUTHOR: E. M. Gulachenski 

DIRECT TECHNICAL INQUIRIES TO: 
E. H. Gulachenski 
New England Electric System 
441 Stuart Street 
Boston, Massachusetts 

DESCRIPTION - This program calculates the overload rating 
of a transformer for either normal or emergency operation 
based on the same information regarding the load curve 
and ambient temperature as is reguired to use ASA C57.92. 
A single rating is given for each loading condition desired, 
thus eliminating the need for interpolation as is reguired 
when using the loading tables in ASA C57.92. The ratings 
given are based on the factory test values for the 
transformer in guestion not on average values as in C57.92. 
Answers are printed out in report form with all input data 
clearly defined and labeled. Storage used is approximately 
19,500 positions. 



MINIMUM SYSTEM REQUIREMENTS - 
I/O. 



A 1620 with 20K and card 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094012 



Indicate "I 
in columns 



N 1" in columns 1-3 and the Program 
4-13 on the IBM Program Order Form. 



16 20-09.4 .013 

TEANSIENT STABILITY FOR TEN MACHINES 



1620-19.4. E09 

CURVE FITTING 
VERSION) 



AUTHOR: 



R. 0. Eigelow 



SIMULATES Hkll HECOBD METHOD JREVISJC 



AUTHOR: w. D. Garland 

DIRECT TECHNICAL INQUIRIES TO: 
w. d. Garland 

New England Electric System 
441 Stuart Street 
Boston, Massachusetts 

DESCRIPTION - Finds the best fitting average life within 
each curve type tried per plant account. Also, calculates 
retirement dxperience and conformance indhces by which 
(goodness of fit) may be assessed. (cf . Methods of 
Estimating Utility Plant Life, Edison Electric Institute, 
1952). 11,246 core positions, including Fixed Point Divide 
subroutine. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 with a 1622 Card Read 
Punch. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - None. 



DIRECT TECHNICAL INQUIRIES TO: 
R. 0. Bigelow 

New England Electric system 
441 Stuart Street 
Boston , Massachusetts 

DESCRIPTION - Calculates Swing Curves for a transient 
stability problem on an AC electric power network. The 
package includes calculation of transfer impedances on 
the network for input data to the main step-by-step 
solution. A plot program is also provided to plot Swing 
Curves directly en the 1620 Typewriter. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READAELE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094013 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



CONTINUED FBOH PBIOB COLUMN 



1620^09.^4.115 

SIHOLTASEODS EQUATION SOLUTION. MP. HATBIX INVEBSION WITH 
CO HP I EX V AIDES 

AOTHOB: 6. S. Haralampu 

DIRECT TECHNICAL INQUIBIES TO: 

6. s. Haralampu 

Hew England Electric System 

441 Stuart Street 

Eoston 16, Massachusetts 

DESCRIPTION - The prograa has been written for the solution 
of a maxiaun of seventeen equations with seventeen unknowns 
with the coefficients, unknowns, and constants being complex 
numbers. The aatrix inversion method is used for the 
solution of the simultaneous equations, and with sense 
switch settings, the inverted matrix may he part of the 
output. Storage 19,500 digits and memory 20K. 

PBOGBAMMING SISTERS - Britten in FOBTRAN. 

MINIMUM SYSTEH REQUIREMENTS - A 1620 with 20K, 1622 Card 
Bead Punch, or 80K 7010 computer. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

CBDEBING INPOEHATION: PROGRAM NUHBEB 1620094015 

Indicate "B N 1 H in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Older Form. 



1620-09,4. ei6 

NETWORK REDUCTION PROGRAM 



DIRECT TECHNICAL INQUIRIES TO: 
E. J. Orth, Jr. 
Southern Services, Inc. 
P. 0. Bos 2641 
Birmingham, Alabama 

DESCRIPTION - computes and/or reads out at each load and 
branch point: Total percent B and X, fault H7A, adjusted 
P and Q loads, voltage, percent drop froa bus voltage, 
line current, low side capacitors, high side capacitors 
adjusted to load voltage, and if regulator installed, 
percent buck or boost and regulator terminal voltage. 
Accepts two types of voltage regulators on main feeder 
only: standard regulator, holding voltage at its terminals, 
and fixed buck or boost. Any number of non-forked branches 
are allowed. Any number of branches may occur at one 
point. Punched output designed for 402-407 listing. 



MINIMUM SYSTEH REQUIREMENTS 
and card I/O. 



A 1620 with 20K, Auto Divide 



AUTHORS: 



Jordan B. S. Moody 



DIRECT TECHNICAL INQUIRIES TO: 
B. H. Jordan 

Indianapolis Power and Light Company 
25 Honunent Circle 
Indianapolis 6, Indiana 

DESCRIPTION - The purpose of the program is to reduce a 
larger network to a smaller equivalent network. A 25 bus 
network can be reduced to any smaller size. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 



MINIMUM SYSTEM REQUIREMENTS 
tape. 



A 1620 with 20K, 1620 paper 



BASIC PROGRAM PACKAGE 

COCUHENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGEAB NDMBEE 1620094016 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



HJjlAL THREE PHASE LINE D£0P. CALCULATIONS 



BASIC PBOGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094020 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.4.023 

SHORT CIRCUIT 1NALYSIS BY HATBIC METHOD 

AUTHOR: James L. Cooke 

DIRECT TECHNICAL INQUIRIES TO: 
James L. Cooke 

Gulf States Utilities Company 
Lock Drawer No. 2951 
Beaumont, Texas 

DESCRIPTION - Programs Compute Short-Circuit Data for an 
Electric Power system. Zero-sequence voltages and currents 
are computed for line to ground faults. Currents and 
impedances (as seen by impedance relays) are computed for 
three phase faults- Complex impedances are used. Memory 
20K, Automatic Divide, Indirect Addressing, and card 
input/output. No other special features required. SPS, 
Fixed Point, non-relocatable. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGEAH NUMBER 1620090023 



Indicate " 
in columns 



> N 1" in columns 1-3 and the Program Number 
4-13 on the IBM Program Order Form. 



AUTHORS: 



E. 



Orth, Jr. 



J. L. Bedmond 



DIRECT TECHNICAL INQUIRIES TO: 
E. J. Orth, Jr. 
southern Services, Inc. 
P. 0. Box 2641 
Birmingham, Alabama 

DESCRIPTION - Computes and/or reads out at each load and 
branch point: Total percent B and X, fault MVA, adjusted 
P and Q loads, voltage, percent drop from bus voltage, 
line current, low side capacitors, high side capacitors 
adjusted to load voltage, and if regulator installed, 
percent buck or boost and regulator terminal voltage. 
Accepts three types of voltage regulators on main feeder 
only: standard regulator, holding voltage at its terminals; 
regulator holding voltage at next load point; fixed buck 
or boost. Any number of non-forked branches are allowed. 
Any number of branches may occur at one point. Output 
may be punched or printed. Punched output designed for 
4e2-407 listing. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 with 40K and card 
I/O. 

BASIC PBCGEAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094018 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Prograa Order Fora. 



1620-09.4.020 

BADIAL THREE PHASE LIN E DROP CALC ULAT ICN IN 2 PASSES 



1620-09.4.026 

CAUER EXPANSIONS OF PASSIVE ONJ^POBT NETWORKS 

AUTHOR: Eric G. Banning 

DIRECT TECHNICAL INQUIRIES TO: 
Eric G. Manning 
University of Waterloo 
Department of Mathematics 
Waterloo, Ontario 
Canada 

DESCRIPTION - The program accepts the coefficients of a 
positive real rational reactance function as input, and 
produces the terms of the corresponding Cauer expansion 
as output. The network elements values follow directly 
from the computed output. The user may choose either of 
the two Cauer forms, by setting a console switch. RC and 
RL functions may be handled by first converting them to 
reactance functions. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, Automatic Divide, 
Indirect Addressing and no other special features required. 



on Microfiche only. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up 
MACHINE READABLE - None. 



ORDERING INFOBBATION: PROGRAM NUMBER 1620094026 



Indicate "B N 1" in columns 1-3 and the Prograa Number 
in columns 4-13 en the IBM Program Order Form. 



1620-09.4.027 

SHORT CIRCUIT ANALYSIS OF RADIAL SYSTEHS 



AUTHORS: W. Mylius, Jr. 
L. Teague 



K. Campbell 



AUTHORS: E. J. Orth, Jr. 



J. L. Bedmond 



DIRECT TECHNICAL INQUIRIES TO: 
W. Mylius, Jr. 
The Rust Engineering Co. 
2316 4th Avenue No. 
Birmingham 3, Alabama 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOB PAGE 

DESCBIPTIOH - This program nay be used by a design engineer 
to calculate circuit breaker requirements in assynetrical 
amperes and interruptive KVA under conditions of both load 
and line side faults. Output includes ratings of reactors 

used. 

Card I/O, 107 with 80-80 panel for listing, memory 40K 
and automatic Divide. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Hicrofiche only. 
MACHINE BEADABLE - None. 

OBDEBING INFOBHATION: PROGRAM NUMBER 1620094027 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



CONTINUED FROM PBIOB COLUMN 

53 buses. For 20K, maximum is 29 buses. Larger systems 
may be handled by segmentizing, core limitation occurs 
in Program 2. All computations are complex. Card I/O. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBING INFOBHATION: PBOGBAH NUMBER 1620094029 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



1620-09.4.030 

KULTI ANCHOR PIPE STRESS ANALYSIS 



.1620-09. 4. g28 

TRANSFORMER BATING FOR NORMAL. AND EMERGENCY OPERATION HITH 
COMPLEX LOAD CYCLES """ " ~ 

AUTHOR: E. H. Gulachenski 

DIRECT TECHNICAL INQUIRIES TO: 
E. H. Gulachenski 
New England Electric System 
441 Stuart Street 
Boston, Massachusetts 

DESCRIPTION - This program has been written to rate 
transformers for both normal and emergency operations based 
on the actual load curve shape for the transformer in 
guestion. It is not necessary to convert the actual load 
curve to a simplified equivalent curve as reguired to use 
the ASA loading guide C57.92. The rating as calculated 
is printed out and so labelled together with the calculated 
top oil rise and hottest spot copper temperature for each 
of the twenty-four hours in the load cycle. An alternate 
use of the same program permits entering a maximum peak 
load expected on a particular transformer together with 
the shape of the load curve and have calculated the top 
oil rise and hottest spot copper temperature attained for 
each of the twenty-four hours in the given load cycle. 
Eguipment specifications - 1620 with 20K memory and a 1622 
Card Punch, no special hardware. Storage requirements 
- no limit on number of transformers to be calculated at 
any one time. Equations used - 

a.) C equals 0.06 (BCC) + 0.04 (HTABK) + 1.33 (GALSO) 

b.) TR equals C (TFL/PFL) 

c.J TGFL equals TAVCO - TFL ♦ 10 where - 

C equals constant used in calculating TR, 
TR equals time constant for the transformer, 
TGFL equals hottest spot capper temperature rise 

over, top-oil temperature at full load 
BCC equals weight of transformer coil and coils - 

lbs., 
BTANK eguals weight of transformer tank - lbs., 
GALSO eguals gallons of oil in transformer, 
PFL eguals total transformer losses at full load - 

watts, 
TAVCU equals average copper temperature rise over 

ambient-0 sub C, 
TFL equals full load top oil rise over ambient-0 

sub c 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

OBDERING INFOBHATION: PBOGBAM NUMBER 1620094028 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09^4^29 

NJTBOBK REDUCTION PLUS DISTRIBUTION FACTOR CALCULATION AND 
AIPiJCAfJON ~ " 

AUTHOR: e. J. Orth, Jr. 

DIRECT TECHNICAL INQUIBIES TO: 
E. J. Orth, Jr. 
Southern Services, Inc. 
P. 0. Box 2641 
Eirmingham, Alabama 

DESCRIPTION - A group of 5 programs - 

1- Convert original network impedances to admittances, and 
compute driving point admittances- 

2- Beduce network and determine complex distribution 
factors from buses eliminated to buses held- 

3- Convert admittances of equivalent network to 
impedances- 

4- Compute magnitude and angle of distribution factors and 
check components to assure that their sum is 1+J0- and 

5- Prorate load/generation from eliminated buses to held 
buses according to distribution factors. 

The first two programs are modifications of 1620 program 
9.4.016, as written by Jordan and Moody of Indianapolis 
Power and Light Company. 

MINIMUM SYSTEM REQUIREMENTS - For 40K, will accept Up to 



AUTHORS: J. F. Asuncion Lloyd B. Coombe 

DIRECT TECHNICAL INQUIRIES TO: 
Lloyd N. Coombe 
The Detroit Edison Company 
2000 Second Avenue 
Detroit 26, Michigan 

DESCRIPTION - This program will perform flexibility 
calculations of a piping system by determining the magnitude 
and direction of the movements and forces acting on any 
specified point due to thermol expansion in a system of 
up to 5 anchors. 



PROGRAMMING SYSTEMS 



Britten in FORTRAN II 



MINIMUM SYSTEM REQUIREMENTS - Card I/O, memory 40K, 
Automatic Divide, and Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-Up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PBOGBAM PACKAGE - Source code. 

OBDERING INFORMATION: PBOGBAH NUMBER 1620094030 

PROGRAM NUHEEB DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIBEHENT 



BASIC none 
OPTIONAL none 



DTB* 
DTB* 



none 
none 



1620 = 09.4.J3J 

NORMAL AND EMERGENCY CABLE RATINGS 



AUTHOR: 



E. scott 



DIRECT TECHNICAL INQUIRIES TO: 
K. E. Scott 

New England Electric System 
441 Stuart Street 
Boston 16, Massachusetts 

DESCRIPTION - Program 16-1 will calculate the thermal 
constants of cable from cable rating handbook data or from 
the physical construction data of the cable. Its output 
is the cable data card used in programs 16-2 and 16-3. 

Program 16-2 will calculate the rating of one or more 
cables of similar or unlike characteristics in a multiple 
occupancy duct bank and the corresponding duct bank and 
the corresponding duct temperature. If no cable ampacity 
values are assigned, the program will calculate the maximum 
current allowed for each cable without exceeding its normal 
operating temperature. If one or more current ratings 
are assigned, the program will calculate maximum values 
for the remaining cables. If all cables are assigned 
values, the program calculates the corresponding duct 
temperature. If any current value assigned causes a cable 
to exceed normal operating temperature, the cable 
identification will be printed together with the duct 
temperature reguired to permit normal operation and duct 
temperature resulting from the current value used. The 
output of the program is a printed listing of the data 
and, if desired, a punched deck usable as the input data 
for program 16-3. 

Program 16-3 will calculate the short-time rating of cables 
using the output deck of 16-2 as the source of most .of 
its input data. Batings (by insertion of desired times 
and/or cable time constants) can be calculated for any 
time or time constant. If neither time nor time constant 
is inserted, the program calculates ratings for one-half, 
one, two, four, twenty-four, and over twenty-four hour 
periods. The output is punched to be listed in report 
form as amperes and MVA for the programmed times. Cards, 
memory 20K, and no other special features reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094031 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



CONTRIBUTED PROGRAHS 



1620 = 09 -1.032 

" TBMSrOEJIS EATINGS BASED OS LOS S Of LIFE AND ACTUAL 
HzSSSS ISiE CYCLE 

AUTHOR: I. B. Gulachenski 

DIRECT TECHNICAL IBQOIRIES TO: 

E. B. Gulachenski 

New England Electric System 

a»1 Stuart Street 

Boston 6 , Massachusetts 

DESCRIPTION - This program «ill calculate the normal and/or 
emergency rating of a transformer given the transformer 
nameplate data, aanufacturers test results, and the shape 
of the loading cycle. Eatings are based on the actual 
21-hour load curve for the transformer. It is not necessary 
to dra» out this curve and thus determine the peak load 
duration and equivalent 12-hour previous load such as is 
required to use the ISA loading guide C57.92 or programs 
nos. 2 and 35. The calculated ratings are based on a 
permitted loss of life which is specified in the input. 
For a no less of life rating, zero (0) percent loss of 
life would be entered on the input cards. Equipment 
specifications - 1620 with 20K memory and 1622 Card Punch, 
no special hardware, written in FORTRAN with no special 
format. 

BJSIC PBOGBAB PACKAGE 

DOCOBBNTATIOH - write-up on Bicrofiche only. 
MACHINE READABLE - None. 

OBDERIBG INFORBATION: PROGRAB NOBBEB 16200911032 

Indicate "B » 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program order Form. 



1620-09.1.033 

GEBEEATIOB PLANNING 

AOTHOBS: T. HcDonough 



H. J. Pfeifer, Jr. 



DIEECT TECHNICAL INQOIBIES TO: 
L. H. Coomne 

The Detroit Edison Company 
2000 Second Avenue 
Detroit 26, Bichigan 

DESCRIPTION - This program was written to assist in the 
economic evaluation of Generation system Expansion plans. 
The program considers such variables as load projection, 
unit capability, heat rate and the resultant effect at 
partial loading, transmission penalty factor, and fuel 
costs and their escalation. Hemory 20K, Automatic Divide, 
Indirect Addressing, transfer numerical fill, transfer 
numerical strip, move flag. SES, Fixed Point. 

EASIC EBOGBAB PACKAGE 

DOCUMENTATION - Write-up on Bicrcfiche only. 

BACHINE BEADABLE - Bone. 
ORDERING INFORMATION: PBOGBAB NOBBEB 1620091033 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



CONTINUED FBOB PEIOB COLOBN 

Department of Water and Power 
Box 3669 Terminal Annex 
Los Angeles 51, California 

DESCRIPTION - The program will determine the Electric Power 
Flow conditions for various system configurations and 
requirements. The preparation of data for the base case 
and for system changes from case to case is done on standard 
forms. There are two simple basic forms so as to minimize 
errors. Iterative calculation with use of Gauss-Seidel 
eguations, accelerating factors, extrapolation, and 
undercorrection. Storage requirements - 10K core, 1 pass. 
Equipment specifications- card system. Bemory-10K. 
Automatic Divide- Indirect Addressing- Special Features. 

BASIC PBOGRAB PACKAGE 

DOCUMENTATION - Write-up on Bicrofiche only. 

BACHINE BEADABLE - None. 

ORDERING INFOBBATION: PBOGBAB NDBBEB 1620091037 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620-0 9.1.0 38 

COBPOTATIOH OF BOOT LOC I 

AOTHOBS: C. «. Eichard, Jr. Harvey H. Paskin 

DIEECT TECHNICAL INCOIRIES TO: 
c. W. Bichard, Jr. 
Bathematics Department 
AF Institute of Technology 
Bright-Patterson AFB, Ohio 

DESCRIPTION - Given the poles and zeros of a rational 
transfer function G (S) , this FOBTBAN Program calculates 
the roots of the characteristic equation for a feedback 
system 1 plus K G(S) equals 0. The locus of one root is 
calculated at equal increments in the complex s-plane for 
monotone variations of the parameter K. The number of 
poles plus the number of zeros of G(S) must not exceed 
25. Points on the locus are calculated only for non- 
negative values of the parameter K. IBB 1620 with 20,000 
digits of memory. 1622 Card Reader-Punch. 

BASIC PROGRAB PACKAGE 

DOCDBENTATION - Write-up on Bicrofiche only. 
BACHINE BEADABLE - None. 

OHDEEING INFCRBATION: PROGRAB NOHBER 1620091038 

Indicate »B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



J620z09j.Jt.036 

iliSX GMJSJT.I.ON jog GIVEN INCJI5£JTAL COST 

AUTHOR: E. J. Orth, Jr. 

DIEECT TECHNICAL INQOIBIES TO: 

E. J. Orth, Or. 
Southern Services, Inc. 
P. 0. Box 2611 
Birmingham, Alabama 

DESCRIPTION - Given the matrix of B coefficients, plant 
limits, fuel cost data, hydro generation, fixed loads, 
tie line values, and LABBDA, plant generation is computed. 
If computed plant generation is less than minimum or greater 
than maximum, the respective limit is inserted as fixed 
generation, and the solution repeated. When all computed 
values are within , range, percent power delivered and LABBDA 
(incremental cost) are computed for each source. The 
general form of the transmission loss equation is used. 
Card I/O, FORTRAN II 10K- 

EASIC SROGBAH PACKAGE 

EOCOBENTATION - Write-up on Hicrofiche only. 
BACHINE READABLE - None. 

OBDERIBG INFORHATION: PBOGBAB NOBBEB 1620091036 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program order Form. 



J62.fc09.1.037 

SiJCTBIC POWJH F LOW I 

AUTHOR: y. J. Fujimura 

DIRECT TECHNICAL INQOIRIES TO: 

y. J. Fujimura 



1620-09.1.039 

SOLUTIONS FOR DETJ1BINATI0N OF LOOP CORRENTS IN ELECTRIC 
CIBCOITS 

AUTHOR: Neale F. Koenig 

DIRECT TECHNICAL INOUIBIES TO: 
Neale F. Koenig 
8963 Hayfield Ct. 
Jenning 21, Hissouri 

DESCBIPTION - By simply inputing the circuit (linear) 
configuration and parameters, a partial solution in terms 
of the Laplace Transformed Equations is obtained. It 
remains to invert the resulting output matrix and perform 
a matrix multiplication to obtain loop currents. 1620 
with 60K (program can be modified for smaller machines 
by reducing the size of problem that can be handled) . 
Automatic Divide, Indirect Addressing, Floating point 
hardware. This program is written in FOBTBAN II. 

BASIC PHOGBAH PACKAGE 

DOCDBENTATION - write-up on Bicrofiche only. 
BACHINE BEADABLE - None. 

OBDERING INFORHATION: PROGRAB BOBBER 1620091039 

Indicate »B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



J610-09J.1KM0 ZS 

SS133rii!£B2S 2JII stjess analysis 

AUTHORS: R. R. Gould E. I. Botte 

DIRECT TECHNICAL INQUIRIES TO: 
R. R. Gould 

Process Engineering Lab. 
Onion Oil Co. of California 
Bodeo, California 

DESCRIPTION - Given the individual member length, planes, 
etc., the coordinates and shape coefficients of each member 
are calculated. A matrix of coefficients is then assembled 
and solved to determine moments and forces at the end of 
each branch due to thermal expansion. These moments and 
forces are then transferred to each member and the stress 
of that member is calculated. The general analytical 
method of flexibility analysis, as described in Design 



CONTBIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

of Piping Systems by M. H. Kellogg Co., has teen somewhat 
modified by eliminating consideration of skewed members 
in space, skewed bends in a plane, and restricting bends 
to 90 degrees per member- This program is limited to 4 
branches and 5 anchors without extraneous restraints. 
Shape coefficients for skewed members in space, skewed 
bends in a plane, and bends ether than 90 degrees per 
member are not calculated and oust be approximated. 

PROGRAMMING SYSTEMS - iritten in FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - IBB 1620, 20K, card I/O, 
Divide and Indirect Addressing. 

BASIC PBOGRAH PACKAGE 

DOCUMENTATION - Hrite-up. 
MACHINE BEADABLE - Object decks. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 

MACHINE READABLE - Source Code. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094040 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
DTR* 



USER VOLUME 
REQUIREMENT 



none 
none 



CONTINUED FROM PRIOR COLUMN 

DIRECT TECHNICAL INQUIRIES TO: 
James I. Cooke 
Gulf States Utilities Co. 
Lockdrawer 2951 
Beaumont, Texas 

DESCRIPTION - To compute B constants (loss formula 
coefficients) of a power system with which incremental 
and total power losses may be computed. Mathematical 
method-bus impedance matrix and KBONS network reduction 
restrictions, range-up to 40 bus power system, of which 
up to and including 15 of the busses may be source busses. 
Off-nominal transformer turns ratios are not recognized 
by the program. Storage reguirement-40K eguipment 
Specifications - Memory 40K other special features reguired- 
Card I/O the program was compiled in Format FORTRAN on 
a 40K IBM 1620 with AD, IA and SF, and the compiled program 
reguired virtually all of the 40K memory. Running time 
on a 31 bus system, 12 of which were sources, without 
iterating for S values, was 30 minutes. 

BASIC PSOGBAM PACKAG1 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094044 

Indicate "B N 1 n in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.4.041 

LOB-PASS FILTER DESIGN 

AUTHOR: Coleman Burton 

DIRECT TECHNICAL INQUIRIES TO: 
Coleman Burton 
General Electric 
4000 NB 39th Street 
Oklahoma City 12, Okla. 

DESCRIPTION - This program computes the actual component 
values of a Low-Pass Filter from its transfer function 
polynomial and point (s) of zero transmission (infinite 
attenuation). Hill handle a transfer function of degree 
15 or less and up to 6 pairs of zeros. Storage requirements 
- 20K-memory. Eguipment specifications- Card system, 
memory 20K Automatic Divide. An absolute value subroutine 
is used. Language-1620 FORTRAN with Format. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094041 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.4.043 

DIGITAL TOOL FOR PLANNING RADIAL DISTRIBUTION SYS TEMS 



1620-09.4.045 

ELECTRIC SHORT CIRCUIT CURRENT CALCULATION 



AUTHOR: 



Jose Barina-Martinez 



AUTHORS: E. J. Orth, Jr. 
J. ». Crawford 



J. L. Redmond 



DIRECT TECHNICAL INQUIRIES TO: 
F. J. Orth, Jr. 
Southern Services, Inc. 
P. 0. Box 2641 
Birmingham, Alabama 

DESCRIPTION - Computes percent vcltage drop, percent voltage 
rise due tc capacitors, net percent voltage drop, line 
flow without cpacitor effect, line flow with capacitor 
effect, and KVAR applied to each point without capacitor 
effect. Gives voltage drop or voltage level under switch 
control. If an area on the system has lower than average 
loading (such as rural lines), will accept individual 
transformer known demand factor. Hill accept distances 
between points in feet, or distance can be entered in 
inches making use of a scale factor. Accepts any 
combination of single-phase, open HYE, and three-phase 
lines. Load forecasting is available. Accepts capacitors 
at any three-phase point on the system. Accepts voltage 
regulators. A coincidence factor may be entered to adjust 
for diversity among systems. Any number of forked branches 
are allowed up to a nest of 25. Any number of branches 
may occur at one point. Eguipment specifications - Card 
I/O, 40K, Auto Divide, FORTRAN II. 

BASIC EROGRAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
BACHINE READABLE - None. 

CEDERING INFORMATION: PROGRAM NUMBER 1620094043 

Indicate "E N 1 M in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620^09^4^044 

1 CONSTANT PROGRAM 



James L. Cooke 



DIRECT TECHNICAL INQUIEIES TO: 
Jose Marina-Martinez 
Puerto Eico Hater Besources Authority 
Electrical Planning and Besearch Div. 
San Juan, Puerto Eico 

DESCRIPTION - This program calculates short circuit currents 
and X/B ratio to the point of fault in complex impedance 
networks. Bus voltages can also be obtained. The program 
can also be used to determine transfer and driving point 
impedance as needed for transient stability programs. 
Restrictions/range-system as large as 150 busses and 250 
lines can be solved. No limitation on number of generators. 
Negative impedance should be avoided. Storage requirements- 
about 17,000 core positions are used. Equipment 
Specifications - Card system, 20K, Automatic Divide, no 
other special feature. Additional remarks- SPS Programming 
System was chosen instead of FORTRAN because a larger 
system can be solved and most important, computing time 
is greatly reduced (about 10 times). For example, a system 
of 85 busses and 160 lines takes about 15 seconds per 
iteration with this program. Fixed Point Arithmetic is 
used. 

BASIC PROGRAM PACKAGE 

D0CUBENTATI0N - Hrite-up on Bicrofiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094045 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



16 20-09.4. 046 

ROOT LOCUS PLOTTING 

AUTHORS: T. F. Gardner E. C. Thompson 

DIRECT TECHNICAL INQUIRIES TO: 
Prof. Hilliam Beuter 
Electrical Engineering Dept. 
South Dakota School of Mines S Tech. 
Bapid City, South Dakota 

DESCRIPTION - This program allows the engineer to plot 
root loci and compute the gains for the points on the locus 
in a fraction of the time required by manual methods. 
An option is provided to allow any portion of the plot 
to be expanded to obtain greater accuracy. Mathematical 
method - This program makes root locus plots by scanning 
the complex freguency plane in search of points where the 
imaginary part of the transfer function being considered 
is egual to zero and the real part is negative. Transfer 
function having a Eaximum of a fourth degree numerator 
and a maximum of a fifth degree denominator. The degree 
of accuracy obtained and the time consumed in obtaining 
the desired results are restricted by the care exercised 
by the operator in selecting the portion of the complex 
plane to be scanned. 

Storage requirements - This program requires 19,127 storage 
positions including all loading routines, the symbol and 
mulitple-add tables and all subroutines. Eguipment 
specifications... 1620 computer with 20K storage. Automatic 
Divide, Indirect Addressing, and 1622 Card Read-Punch. 
The program is written in 1620 Floating Point FORTRAN with 
Format language. In addition, a special subroutine was 
written that modified the standard FORTRAN language to 
allow plotting. This subroutine was written in machine 
language and replaced the ATAN subroutine in the standard 
deck. 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 



CONTINUED FROM PRIOR COLUMN 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094046 

Indicate "E N 1 n in columns 1-3 and the Ptograa Number 
in columns 4-13 on the IBM Prog ran Order Fori. 



1620-09.4.048 

ELECTRIC POWER FLOW III 



AUTHOR: 



I. Lee 



DIEECT TECHNICAL INQUIRIES TO: 
H. Y. Lee 

Dept. of Water 6 Power 
Box 3669 Terminal Annex 
Los Angeles, Calif. 90054 

DESCRIPTION - The SPS 2 progran as furnished is setup to 
solve electric network problems up to 150 buses and 220 
lines. In addition to the features found in most Power 
Flow Programs, this progran allows one special line per 
bus where the impendance of the line is unrestricted. 
It may be a negative value, zero for tying two buses 
together, cr less than 0.011 percent on 100-MVA base. In 
many problems the slow convergence and errors around a 
bus having very high and low impendance line terminations 
can be avoided. Storage used by program - 60K core. 
Equipment reguired by program- Card System, TNS, TNF, MF, 
Auto Divide, Indirect Addressing. Programming type - SPS. 
Language used in the writeup- SPS. Two data forms, one 
for the bus and one for the line/transformer are used for 
all the runs. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

HACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094048 

Indicate "B N 1" in columns 1-3 and the Erograa Number 
in columns 4-13 on the IBM Program Order Form. 



1620x09.4^049 

ELECTRIC LOAD FLOW SINGLE LINE DIAGRAM OUTPUT 



AOTHOR: 



Marino 



DIRECT TECHNICAL INQUIRIES TO: 
B. I. Marino 

Planning and Research Department 
Long Island Lighting company 
175 East Old Country Road 
Hicksville, New York 

DESCRIPTION - This program prepares an output for the 
Electric Load Flow Program No. 1620 SU-04X-07X in single- 
line diagram form, with names of buses, lines and 
transformers indicated, and voltages, loads, generation, 
and flows in their corresponding place on the diagram. 
This program does not modify the generalized core map of 
the load flow, so a seguence of cases can be run. 
Modification of common data storage (as described on cages 
24 and 25 of the load flow manual) apply to this program. 
The use of 100 MVA base in the load flow data will lead 
directly to answers in megawatts and megavars on the 
diagram. Partial diagrams can be obtained at any time 
during solution of load flow. Indication of outage of 
lines and buses is provided. Losses in lines are calculated 
separately from losses in transformers. Total generation 
and load are calculated. The range and restrictions for 
the load flow program apply for this program as well. 
Storage reguirea- 20K memory. Equipment - Card system., 
TNS, TNF, MF., Autodivide. , Indirect Addressing. The use 
of a bigger storage machine or the sacrifice of some 
features of the program will allow removal of some of these 
requirements. Fixed Point Arithmetic is used. Programming 
type - SPS - 1620/1710. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094049 



circuit duties at all nodes in a network as well as the 
line contributions to the faulted node. Also, for specified 
nodes, total three phase duties and line contributions 
are given after the removal of a tie line. Network changes 
are permitted allowing systems to be studied through a 
growth period, a feature which reduces the execution time 
per network studied. The solution consists of building 
a driving point transfer impedance matrix (inverted driving 
point and transfer admittance matrix) as each node is 
introduced to the network, the solution is direct not 
interative. Language used in the writeup - FORTRAN II. 
The program as submitted here has a max. range of 69 nodes 
and 200 ties. However, for use on other computers this 
range can be expanded or contracted to conform with other 
computer limitations. 

PROGRAMMING SYSTEMS - WRITTEN IS FORTRAN II. 

MINIMUM SYSTEM REQUIREMENTS - Storage used by program- 
60K core with card and disk file systems. Equipment 
required by program- Card System, disk file system. Program 
can be used on lesser machine. Requirements which can 
be easily removed- disk file system (with reduced program 
range) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
HACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094050 

Indicate M B N 1" in columns 1-3 ana the Prograi Number 
in columns 4-13 on the IBM Program Order Form. 



16 20-0 9 .4.05 1 

EVA LUATION OF POWER TRANSFORMER LOSSES 

AUTHOR: E. H. Gulachenski 

DIRECT TECHNICAL INQUIRIES TO: 
B. H. Gulachenski 
New England Electric System 
441 Stuart St. 
Boston, Mass. 

DESCRIPTION - This program calculates the capitalized cost 
of losses for a transformer based on the estimated yearly 
peak loads throughout the life of the transformer. The 
answers are in the following form - No load loss value 

- (dollars per kw of transformer core loss) Load loss value 

- (dollars per kw of transformer load loss) These two 
figures are included in the specifications for a new 
transformer and play an important part in its design. 
When multiplied by the design values of core loss and load 
loss, the resulting dcllar figure can be added directly 

to the cost of the transformer thus providing a means of 
evaluating several designs on a comparable basis. Card 
system with 20K memory and no special features. 

BASIC PROGRAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094051 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



Indicate 
in columi 



"B N 1" in columns 1-3 and the Program Number 
s 4-13 on the IBM Program Order Form. 



1620-09.4.050 

THREE PHASE SHORT CIRCUIT STUDY PROGRAM 

AUTHOR: John S. Krystoff 

DIRECT TECHNICAL INQUIRIES TO: 
John S. Krystoff 
Department of Water and Power 
Box 3669 Terminal Annex 
Los Angeles 54, California 

DESCRIPTION - This program was written to assist power 
system planning engineers in evaluation cf electrical 
networks. The program will calculate three phase short 



16 20209^052 

SCALAR SHORT-CIRCUIT 

AUTHOR: Dr. D. Carroll 

DIRECT TECHNICAL INQUIRIES TO: 
Dr. D. Carroll 
Electricity Supply Board 
58 Upr. Mount St. 
Dublin 2, Ireland 

DESCRIPTION - Program (in SPS3 for high capacity and speed) 
calculates the short-circuit current distribution and total 
MVA for symmetrical 3-phase faults at any specified bus 
of a power system. Branch resistance and reactance data 
are converted to admittance magnitudes and all calculation 
is scalar. Current and voltage at buses other than the 
faulted bus can be obtained. Program also allows specified 
branch outages to be effected between fault calculations, 
thus permitting a complete schedule of successive faultings 
and switchings to be run without intervention. Solution 
by Gauss-Seidel Interation and Extrapolation is 4-6 times 
faster than an A.C. program, and accuracy is within 1-3 
percent thereof. Restriction 8 range - up to 150 buses, 
250 branches/infeeds, one pass. A 20K 1620 card system 
with TNS, TNF, MF., Auto Divide and Indirect Addressing 
is required by the program. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620094052 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program order Form. 



CONTBIBOTED PBOGEABS 



1620-e9.lt. 853 

SCALAR BLECTBIC LOAD FLOB 



JOTHOB: 



Dr. D. Carroll 



DIRECT TECHNICAL INflOIHIES TO: 

Dr. D. Carroll 
Electricity Supply Board 
58 opr. Hount St. 
Dublin 2, Ireland 

DESCRIPTION - Progran (in SPS3 for high capacity and speed) 
calculates the current in each branch of a power system, 
given the nv load and generation at each bus and resistance 
and reactance of each branch. Branch data are converted 
to admittance lagnitude and all calculation is in scalar 
arithmetic. Current is proportional (to within 3-5 percent) 
to real power flow in the network. Solution by Gauss- 
Seidel Iteration and Extrapolation is four-six tines faster 
than an A.C. study. Restriction 8 range - up to 150 buses, 
228 branches, one pass, A 20K 1620 card system with TBS, 
TNF, HF., auto Divide S Indirect Addressing is reguired. 

B1SIC PROGB1H PACKAGE 

DOCOBENTATION - Irite-up on Microfiche only. 
BACHIBE BEADABLE - Bone. 

ORDEBIBG IBFOEBATIOB: PBOGRAB BOBBER 1620094053 

Indicate "B B 1" in columns 1-3 and the Program number 
in columns 4-13 on the IBB Progran Order Forn. 



1620-09.4. 058 

ELJCTRICAL NJTNOBK BEDDCTIOH 

ADTHOB: Br. Edmond ODwyer 

DIRECT TECHNICAL IBQ.OIRIES TO: 
Br. Ednond ODwyer 
Electricity Supply Board 
58 Upper flount St. 
Dublin 2, Ireland 

DESCRIPTIOB - Progran will reduce an electrical impedance 
network to any desired size. Eliminahle or retainable 
busses may be specified. Program accepts as input branches- 
1/ series elements - B, I P.O., 2/ load/generation and 
shunt elements fl», BVAR and P.O. voltage magnitude, and 
converts each type to an eguivalent P.O. admittance. 3/ 
0/p options, 1 reloadable to 1620-09.4.052. Bain 
applications- reductions to bring networks within the 
capacity of short circuit and transient stability programs, 
to cut short circuit program solution times, and for 
unsymmetrical fault calculations. Reduction is by 
successive star-mesh conversion and paralled combination 
The elimination sequence is automatically optimized. All 
computations are in complex arithmetic, using the SPS 
Floating Point subroutines. 270 independent (i.e. non- 
parallel) input branches, for Bantissa length eguals 12, 
and 20K storage. Eguipment reguired- Card system TBS, 
TNF, HF Auto Divide, Indirect Addressing and TFL. 
Requirements which can be easily removed are TFL, Auto 
Divide. Britten in SPS III. 



1620-09.4.856 

VOLTAGE PROFILE ABD FAOLT COJREBT CALCULATIONS FOR RADIAL 

DJSTEIBOTION LINES " 

AOTBOB: J. I. Louis 

DIRECT TECBNICAL INQOIEIES TO: 

J. Y. Louis 

long Island Lighting Company 
Hicksville, N.I. 

DESCRIPTION - This program accepts data generally available 
from grid nap cf primary distribution circuits to compute 
the voltage profile along a primary feeder circuit. The 
same data are used for fault current calculation along 
the circuit as an optional feature. This program will 
handle as many feeder circuits as desired with any number 
of junctions, branches and sub-branches. The eguipment 
that can be included in the study are- voltage regulators, 
boosters, stepdown transformers with or without tap, 
switched and fixed capacitors. Any number of stepdown 
transformers can be included on the main but limited to 
one along each branch. The program is written in PDQ 
FORTRAN for a 20K IBB 1620 digital computer with card 
system and Auto divide. 

BASIC PBOGBAB PACKAGE 

DOCOBEBTATIOB - Srite-up on Bicrofiche only. 

HACHINE BEADABLE - None. 

ORDERING INFORBATIOB: PROGBAB NOHBEB 1620094056 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



J62ffc09,..4.057 

C.ALCOLATION gF POLES. AND ZEBOS OF ABPLIFI EBS TRANSFER 
FUNCT IONS 

AUTHOR; E. B. Rips 

DIRECT TECHNICAL INQOIBIES TO: 
E. B. Bips 

Electrical Engineering Dept. 
Newark college of Engineering 
Newark, N.J. 



BASIC PROGBAB PACKAGE 

DOCOBENTATION - «rite-up on Bicrofiche only. 

HACHINE BEADABLE - None. 

OBDEHING INFORBATION: PROGRAB BOBBER 1620094058 

Indicate "B B 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBB Progran Order Form. 



1620-09.4.059 

ELECTRIC IS2SILB AHALYSIS 

ADTHOB: Hae E. Heads 

DIRECT TECHNICAL IBQOIRIES TO: 
Hae E. Heads 

Baltimore Gas 6 Electric Co. 
Engineering Computer Applications Group 
Baltimore, flaryland 21203 

DESCRIPTION - The program is part of a system for 
collecting, coding, analyzing and reporting information 
relative to trouble and interruptions experienced in our 
electric transmission and distribution system. Its purpose 
is to provide statistical information in a readable format 
pertaining to the causes of faults and their effects en 
the electric system. Information obtained is useful in 
planning, overhauling and improving electrical eguipment 
and customer service. The program is a revision of a 650 
program that was previously used by the company. 



PROGRAHHING SYSTEHS 
in 1620/1710 SPS. 



The program is written in four phases 



HINIMOH SYSTES BEQOIREHENTS - Card I/O with Auto Divide 
and Indirect Addressing, storage 20K. 

BASIC PEOGRAH PACKAGE 

DOCOBENTATION - Nrite-up on Bicrofiche only. 

MACHINE BEADABLE - None. 

ORDERING INFORBATION: PEOGRAB BOBBER 1620094059 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



DESCRIPTIOB - This progran utilizes topological data for 
an electronic network, together with parameter values to 
calculate the poles and zeros of an active network transfer 
function. Betworks having a maximum of 30 branches can 
be dealt with. Of these branches a maximum of 10 may be 
either purely capacitive or purely inductive. The technique 
utilized cannot treat cases where the number of zeros 
eguals or exceeds the nunber of poles. Hultiple poles 
can be found but zeros cannot be correctly determined in 
such cases. In practice, however, such a condition rarely 
arises. A 60K core card system with Autc Divide is reguired 
by program - providing user is willing to subdivide program 
and punch out intermediate results to serve as data for 
succeeding sections. The program can be used on a lesser 
machine. Programming Language - AFIT, improved FOETRAN 
1.1.010. 

BASIC PROGBAB PACKAGE 

DOCOBENTATION - »rite-up on Bicrofiche only. 

HACHINE BEADABLE - Bone. 

OBDEBING INFOEHATION: PBOGBAB BOBBER 1620094057 

Indicate "E N 1" in columns 1-3 and the Progran Bumber 
in columns 4-13 on the IBB Program Order Form. 



OVERLOAD RATINGS OF 65 DEGREES CENTIGRADE BIS J TBANSFORBERS 
BASED ON LOSS OF LIFE AND 24-H00B LOAD CYCLE 



ADTHOB: 



Gulachenski 



DIBECT TECHNICAL IBOOIRIES TO: 
E. B. Gulachenski 
New England Electric System 
441 Stuart Street 
Boston, Bass. 

DESCRIPTIOB - This program will calculate the normal and/or 
emergency rating of 650 Centigrade Rise Transformers given 
the transformer nameplate data, manufacturers test results, 
and the shape of the loading cycle. Ratings are based 
on the actual 24-hour load curve for the transformer. 
It is not necessary to draw out this curve and thus 
determine the peak load duration and eguivalent 12-hour 
previous load such as is required to use the ASA loading 
guide Centi. 57,929. 

PROGRAHHIBG SYSTEBS - Compiled with OTO FORTBAN processor. 

BINIMOB SISTEB BEQDIBEHENTS - Card system with 20K memory. 

BASIC PBOGRAB PACKAGE 

DOCOBEBTATIOB - Nrite-up on Bicrofiche only. 



COSTRIBOTED PBOGEABS 
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COHTIHOED FROH PEIOB PAGE 

MACBINE BEADABIE - Hone. 

OBDEBIBG IBFORBATIOH: PBOGEAB BOHBEE 1620094060 

Indicate "B B 1" in colmis 1-3 ana tie Program Humber 
in columns 4-13 on the IBB Program Order Form. 



i62a-09.«.agi 

ELECTRICAL FIELD IBTEBSITY PATTEBES-EBIVEE ABTENHA ABBAY 



AOTBOES: Br. A. C. HarveY Br. G. L. Gearhart 

DIBECI TECBBICAL INQOIBIES TO: 

Br. A. c. Harvey 
Systems Analyst 
Tri-state college 
Angola, Indiana 

DESCRIPTION - This program calculates the electrical field 
intensity pattern of any given broadcast band antenna 
array. The program accepts the distance, bearing, antenna 
height, electrical phasing and field ratio of each antenna 
and the BBS of the entire pattern. Both the angle of 
elevation and azmith are swept in" varying increments for 
the output of the electrical field intensity in each 
direction. Baxiaum of 14 antennas per pattern. 

PBOGBAHBING SISTEBS - Britten in FORTEAH without format. 
Program Bo, 1.1.010 



BIBIBOB SISTEM BEQOIREBEHTS - 1620 Bod I 20K memory. 
Indirect Addressing, Card I/O, Auto Divide. 

BASIC PBOGEAB PACKAGE 

DOCOMEBTATIOH - Write-up on Bicrofiche only. 

BACBIHE READABLE - Bone. 

OBDEBIBG IBFOBBATIOB: PBOGEAB NOBBEB 1620094061 

Indicate *»E B 1" in columns 1-3 and the Program number 
in columns 1-13 on the IBB Program order Form. 



1620-09.11.862 

COMB IHATIO HAL SWITCHING FOBCTigj S OBB00TIHB SET 



COBTIHOED FEOB PBIOE COLOMS 

FOBTEAB II. 

BIBIBOH SISTEB REQ0I8EBEHTS - Source program may be executed 
directly with 1620 FOBGO; Then 60K memory is mandatory. 
Object program may be executed with 40K memory. Equipment 
- 60K 1620 vith 1622 Card Bead Punch, and Off-Line listing 
on 407. 

BASIC PBOGEAB PACKAGE 

DOCOBEBTATIOB - «rite-up on Bicrofiche only. 
BACHIBE BEADABIE - Bone. 

ORDBRISG IBFOBBATIOB: PBOGEAB BOBBER 1620094063 

Indicate "B H 1" in columns 1-3 and the Program Humber 
in columns 4-13 on the IBB Program Order Form. 



1620-89.4.064 

locdi, - j rooj locos algobit 



ADTBOE: 



Br. B. A. Borthouse 



AOTHORS: Br. 



Dietmeyer Br. P. Schneider 



DIRECT TECBBICAL IHQOIRIES TO: 

Prof. C. H. Davidson, Director 
Engineering Computing Lab. 
Dniversity of Wisconsin 
Badison, Wisconsin 53706 

DESCRIPTIOB - The subroutines in this set implement many 
operations necessary to manipulate combinational logic 
functions. They allow the user to easily write FOBTRAB 
programs which implement algorithms for performing classical 
minimization, analysis synthesis, symmetry detection, 
reduncancy detection, etc. The FORTRAB program need only 
provide storage allocation, bookkeeping, and the proper 
seguence of call statements. 



DIRECT TECBBICAL IBC.OIRIES TO: 
Br. B. A. Borthouse 
Dniversity of Wisconsin-Hilwaukee 
Electrical Engr. College of Applied Science 6 Engr 
Bilwaukee, Wisconsin 53202 

DESCRIPTION - LOCDS is a digital computer program designed 
to calculate the values used for the root loci cf most 
transfer functions up to the 14th order. LOCDS has the 
capability to output in three forms, print, plot, or both. 
The plotting is performed on the line printer thus an- 
incremental plotter is not required. The input form to 
locus can be either in a coefficient form of in a factored 
form. A control card is necessary to state the starting, 
terminating, and increment of a constant gain, K, which 
multiplys the entire numerator polynomial. This control 
card also specifys the form of the polynomial inputs, 
whether factor or coefficient, and one of the three forms 
of output. 

PROGRAHBIBG SYSTEBS - Britten in PORTBAH IID with Format. 

BIBIBOB SYSTEB REQOIREBEHTS - 1620 Bode II, 60K decimal 
digits without local card, 40K decimal digits with local 
card. 1443 On-line Printer, card reader, and one 1311 
Disk Drive. 

BASIC PBOGEAB PACKAGE 

DOCDBEBTATIOB - Write-up on Bicrofiche only. 
BACBIBE READABLE - Hone. 

ORDERIBG IBFCRBATIOB: PBOGEAB BOBBER 1620094064 

Indicate "B N 1" in colunns 1-3 and the Program Dumber 
in columns 4-13 on the IBB Program Order Form. 



1620-09.4.065 

BODE = A FREOOJHCY RESPOBSE ALGOBITHB 



PBOGRABBIBG SISTEBS - SPS. 
with FOETRAH II (F eguals 



Subroutines are compatible 
0, K eguals 5) . 



ninihdh SYSTEB REQUIREMENTS - Storage- varies with number 
of subroutines being used. Card system. Indirect 
Addressing, TBS, TBF, BF and 1443 Printer optional. 

BASIC PROGBAB PACKAGE 

DOCOBEBTATIOB - Write-up on Bicrofiche only. 
BACBIBE READABLE - Bone. 

ORDERIBG IBFOBBATIOB: PROGRAB BOBBER 1620094062 

Indicate "B B 1 M in columns 1-3 and the Program Humber 
in colunns 4-13 on the IBB Program Order Form. 



1620-09.4^063 

SCATTERING-MATRIX PABABETEBS COBPOTED FROM SHORT-CIRCUIT 
AEBITTANCE PABABETEBS 



AUTHOR: 



Br. A. L. Pike 



DIEECT TECBBICAL IH80IRIES TO: 
Br. A. L. Pike 
Tufts Dniversity 
E. E. Dept. 
Bedford, Bass. 02155 

DESCEIPTIOB - This program converts a 2X2 matrix (as many 
as 10 matrices in a set) of twoport complex-number short- 
circuit admittance parameters into the corresponding complex 
matrix of normalized scattering parameters. For output 
punching, input control transmits appropriate labels for 
(1) common-emitter transistor data, or (2) General twoport 
data.. While input data are in rectangular form, output 
data are computed in both rectangular and polar forms. 
Optional punching provides a second set of rectangular- 
form output data in simple format suitable for further 
processing. 

PROGEAMBIHG SYSTEBS - Source Language - Written in 1620 



AOTBOR: Mr. R. A. Borthouse 

DIRECT TECBBICAL IHOOIRIES TO: 
Hr. R. A. Borthouse 
Dniversity of Wisconsin-Hilwaukee 
Electrical Engr. 

College of Applied Science £ Engr. 
Bilwaukee, Wisconsin 53201 

DESCEIPTIOB - BODE is a digital computer program designed 
to calculate the values used for determining frequency 
response of most transfer functions up to the 15th order. 
It provides sufficient material for the user to perform 
Bode Plot, Bichols chart, Byguist Plot and/or Inverse 
Hyquist plots. BODE has the capability to output in three 
forms, print, plot, or both. The plotting is performed 
on the line printer thus an incremental plotter is not 
required. The input form to BODE can be either in a 
coefficient form or in a factored form. A control card 
is necessary to state the starting, terminating, and 
increment of the radian per second frequency. This control 
card also specifys the form of the polynomial inputs, 
whether factor or coefficient, and one of the three forms 
of output. 

PEOGRAMHING SYSTEMS - BODE is a main line program written 
in FOETRAH IID with Format. 

BIBIBOB SYSTEB RIQUIHEMEHTS - 1620 Bodel II, 60K decimal 

digits without local card, 40K decimal digits with local 
card. 1443 on line Printer, card reader, and one 1311 
Disk Drive. 

BASIC PBOGEAB PACKAGE 

DOCOHEHTATION - Write-up on Bicrofiche only. 
BACBIBE READABLE - Hone. 

ORDERIBG IBFOBBATIOB: PROGRAB BOBBER 1620094065 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



1628-69. 11.866 
ANALOG. 

author : 



Hr. B. Northouse 



DIRECT TECHNICAL INQUIRIES TO: 

Br. B. ft. Northouse 

University of Wisconsin-Milwaukee 

College of Applied Science and Engineering 

Electrical Engineering 

Milwaukee, Wisconsin 53201 

DESCRIPTION - iNftlCG is a digital computer prograa which 
»hen fea the coefficients of a third order or smaller 
differential equation of a single degree, will calculate 
and plot the ANALOG coipnter circuitry coiplete with all 
elenent values. 

PROGRAMMING SYSTEMS - Programed in FORTRftN IID with Foriat 
ANALOG is a nainline program calling several subroutines. 
IBB or CAICOBP plotting subroutines Plot and Char required. 

BIBIBDB SYSTEB REQUIREMENTS - 1628 II with 68K of decimal 
digits, card reader, punch, CAICOBP 588 Incremental plotteb, 
1311 Disk File. 

BASIC PBCGBAB PACKAGE 

DOCOBEBTATIOB - Write-up on Bicrofiche only. 

MACHINE BEADABLE - Bone. 

OBDEBIBG INFORMATION: PEOGBAB NUMBER 162889*866 

Indicate "B N 1" in coluans 1-3 and the Program Nnmber 
in coluans 4-13 on the IBM Prograa Order Form. 



1620-8 S.5.881 

IfilCAL GEAR SELECTION 



CONTINUED FBOB PEIOB COLUMN 

DOCUMENTATION - Write-up on Bicrofiche only. 
NACBIBE READABLE - None. 

OBDEBIBG INFORMATION: PR0GR1B NOBBER 1620895802 

Indicate "B » 1" in coluans 1-3 and the Prograa Number 
in coluans 4-13 on the IBB Prograa Order Form. 



AOTBOB: 



B. Kerr 



DIRECT TECBNICiL INQUIRIES TO: 
H. B. Kerr 
Box 21 

Tennessee Polytechnic Institute 
Cookeville, Tennessee 

DESCRIPTION - In many mechanical designs, it is necessary 
to transait power or a specific motion froa one shaft to 
another, where the shafts are non-intersecting ana with 
various angles between shaft centerlines. Belical gears 
are frequently used to supply this need. Design 
considerations are usually such as to dictate such factors 
as- normal diametral pitch, angle between shaft centerlines, 
ana the number of teeth needed. The problem of deterning 
the pitch diameters of the two gears and their corresponaing 
helix angles is one that calls for trial ana error solution. 
To satisfy the reguireaents listed above, there are two 
possible designs that may be determined, i.e., two pitch 
diaaeters and two two helix angles for each solution. 
This program will give the two possible solutions to the 
design. 

PROGRABBING SISTEBS - Program written in FOBTRftN with 
Fornat. 

BINIBOB SYSTEB REQOTBEAENTS - Memory 20K (card 1628) , no 
special features reguired. 

BASIC FBCGBAH PACKAGE 

documentation - write-up on Bicrofiche only. 

BACHINE READABLE - None. 
ORDERING INFORMATION: PROGBAB NDHBER 1628895001 

Indicate "E N 1" in coluans 1-3 and the prograa Number 
in columns 4-13 on the IBB Program order Form. 



1621=09.5^002 

COHPRESSION SPRING DESIGN, DYNAMIC LOAD 



flrj^ii TB O-DI BENSIONAL, TRANSIENT OR STEADY BEAT 
CONDUCTION '"' ~ 

AUTHOR: a. Barley 

DIRECT TECBBICAL INQUIRIES TO: 
B. Burley 
ACF Industries 
336 Woodward Rd. 
Albuquerque, New Mexico. 

DESCBIPTIOB - Solves the heat equation in finite differences 
Cartesian coordinates. Transient or steady solutions nay 
be obtained. The systen may contain heat generation and 
be composed of different materials. Diagonal boundaries 
are allowed. Boundary conditions may be fixed temperature 
or connection. Peacenan-Racford, or Alternational-Direction 
Implicit method is used. The system may contain up to 
488 nodes consisting of up to 24 different materials. 
Thermal properties may be anistropic, but are not 
temperature dependent. The program is in six parts stored 
on magnetic tape, each part nearly filling memory. 
Iteration occurs with three program parts. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 

MINIHBM SYSTEM REQUIREMENTS - Memory 60K, Automatic Diviae, 
two magnetic tapes. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620095004 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.5.8 05 

FAMILY OF COMPUTER PROGRAMS FOR DISK CAM COMPUTATIONS 

AUTHOR: Beinz C. Altmann 



*M 



DIRECT TECHNICAL INQUIRIES TO: 
Heinz C. Altmann 
Eastman Kodak Company 
Kodak Park, Building 23 
Rochester 4, New York 

DESCBIPION - Computes cam manufacturing tables, approximate 
pressure angles, and radii of curvature for disk cans, 
with roller followers, of three types - radial translating 
follower (cutter diameter may be different from follower 
diameter), offset translating follower, pivoting-ara 
follower. Cycloidal motion is used for rises and returns. 

PROGRAMMING SYSTEMS - Britten in FORTRAN with Fornat. 

HINIBUH SYSTEM REQUIREMENTS - 1620 with 28K memory. 

BASIC PBOGBftH PACKAGE 

DOCUMENTATION - Write-up on Bicrofiche only. 
BACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620095005 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program order Form. 



AUTHOR: 



B. Kerr 



DIRECT TECHNICAL INQUIRIES TO: 
H. B. Kerr 
Eox 21 

Tennessee Polytechnic Institute 
Cookeville, Tennessee 

DESCRIPTION - Helical Compression Springs are very widely 
usea to support ana withstand various dynamic loads. A 
properly designed helical spring should be carefully 
designed so that the average load and the range load are 
such as to develop a stress in the spring material which 
falls within the endurance limit of the material in order 
that the fatigue life of the spring is sufficiently long. 
This design problem usually involves a trial ana error 
solution and this prograa is designed to perform this 
function. 



NATURAL F REQU ENCIES AND R ELATIV E DEFLECTIONS AND FORCES 
OF A. VIBRATING BEAM " " 



AUTHOR: 



J. Lee 



PROGRAMMING SYSTEMS 

Format. 



Program written in FORTRAN with 



BINIBUB SYSTEM REQUIREMENTS 
special features required. 

BASIC PBCGBAB PACKAGE 



Memory 20K (card 1620) no 



DIRECT TECHNICAL INQUIRIES TO: 
J. J. Lee 

Director General ships 
Department of National Defence 
Ottawa, Canada 

DESCRIPTION - The program is aimed at finding the natural 
frequencies of a beam-like structure 6 subsequently the 
relative deflections $ forces along the bean. The beam 
can have any cross section and can be either a straight 
beam or bean with bends. Eccentricities & moments of 
inertia of attached weights are taken into consideration. 
The frequency can therefore be either pure flexural or 
couples with torsional vibration. The method used is 
transfer matrices, i.e. the forces & deflection are 
transferred from one segment to the next segment of the 
beam, and the natural frequency is obtained by trial similar 
to Bolzers method. The beam must be diviaea into straight 
sections, each considting of a number of segments. The 
program can handle problems with 1 to « sections and a 



CORTRIBOTED PBOGEABS 
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total of not lore than 28 segments. Section I of the 
prograa is for cantilever beaa with rigid or flexible 
support. Section II is for free-free beaa, and Section 
III for siiply-snpported beaa. 

PBOGRABBIBG SISTEBS - FOBTBAB II, Hainline, complete. 

BINIBUB SISTEB HEQOIBEBENTS - Storage used by progran-»0K 
core memory- Card system. Auto Divide, Indirect addressing. 

BASIC PBOGBAB PACKAGE 

DOCOBEBTATIOB - Brite-up on Bicrofiche only. 
BACHIBE READABLE - Bone. 

OBDEBIBG INFORBATIOS: EROGBAB RUBBER 1620095006 

Indicate "E B 1" in columns 1-3 and the Prograa Number 
in coluans U-13 on the IBB Prograa Order Pora. 



1620-09.5.007 

ANALISIS OF BEIIC0IDA1 GIRDERS 

ADTHOE: B. Beddy 

DIBECT TECBBICAL IBflOTBIES TO: 

B. Beddy 

coaputer Science Departaent 
Stanford University 
Stanford, California 

DESCBIPTIOB - This is a general purpose prograa for the 
solution of fired ended helicoidal girders. The loading 
aay be unifora or variable. The sectional properties Bay 
be unifora or variable. Hatrix aethod of analysis is used 
for the solution of the problen. Floating Point nuabers 
carry a six digit nantissa. Uses all the 40,000 positions 
of the 1620 storage. If the loading or sectional properties 
are variable the helicoid can only be divided into 30 
segaents or less, otherwise, the prograa vill handle any 
nuaber of points. If the prograa is to be used on coaputers 
«ith an online printer all the punch statements may be 
changed to print statements. 

PROGRABHING SISTEBS - Britten in FOBTBAB II. 

BIBIBBH SISTEB REQUIREHENTS - O0K Card 1620 with AutO- 

Divide and Indirect Addressing. 

BASIC PBOGBAB PACKAGE 

DOCOBEBTATIOB - Brite-up on Bicrofiche only. 
BACHINE BEADABLE - Bone. 

OBDEBIBG IBFOBBATIOB: PBOGBAB BBBBEB 1620095007 

Indicate "B B 1" in coluans 1-3 and the program Buaber 
in coluans a-13 on the IBB Program order Form. 



COBTIBOED FBOB PBIOB C010BB 

as large a system as practical for the machine 
configuration, 1770 mains and an unlimited nuaber of loops, 
length and flow data can be varied by powers of 10, and 
the program handles loops between regulators of different 
pressures, separate prograas are used for the phases of 
loading data, solution and punching out results. Loop 
data cards are manually reloaded after each iteration, 
load gathering, error checking and junction pressure 
prograas have been written separately. 

PBOGBABBIBG SYSTEBS - Language used in the writeup-SPS. 

BINIBOH SISTEB REQOIREBENTS - Card system. Auto Divide. 

BASIC PBOGBAB PACKAGE 

DOCOBEBTATIOB - Brite-up on Bicrofiche only. 
HACBIBE BEADABLE - Bone. 

OBDEBIBG IBFOBBATIOB: PBOGBAB BOBBEB 1620095010 

Indicate "B B 1« in coluans 1-3 and the Program Buaber 
in columns »-13 on the IBB Program Order Form. 



1620-09.5.011 

HEATIHG-LOAD DITEBBIBATIOB FOB BUILDINGS 



1620-09.5.809 

SSBSIO CI CLE BEAT B.ALANCE 

AUTHORS: I. J. Fujinura 



Bobert B. Bhite 



DIBECT TECBNICAL INQUIRIES TO: 
Bobert B. Bhite 

Los Angeles Department of Bater 6 power 
Box 3669 Terminal Annex 
Los Angeles, California 90051 

DESCBIPTIOB - Calculates steam extractions and heat rate 
for a steam generating plant. Bethod- building block with 
Fixed point Arithmetic. Bestrictions- 30 eguipment blocks 
and a turbines. 

PBOGBABBIBG SISTEBS-SPS- 1620/171 

BIBIBDB SISTEB EEfiOIBEBEBTS - Storage used by prograa- 
5UK. Card system, disk file system with one pack, TNS, 
TNF, BF, Auto Divide, Indirect Addressing. 

BASIC PBOGBAB PACKAGE 

eocObebTATIOB - Hrite-up on Bicrofiche only. - 

BACBIBB READABLE - Bone. 

OBDEBIBG IBFOBBATIOB: PBOGRAB BOBBER 1620095009 

Indicate "E B 1" in columns 1-3 and the Program Number 
in columns 0-13 on the IBB Program Order Form. 



1620^09.5^010 

GAS NETSORK ANALISIS PBOGBAB FOB LOBj. BEDIOB JBD BIGB 

PRESSURE SISTEB 



AUTHOR: 



Baynond R. Golli 



BIBECT TECBBICAL INQOIBIES TO: 
Raymond R. Golli 
The East Ohio Gas coapany 
1717 East 9th Street 
Cleveland 1<l, Ohio 

DESCRIPTION - The program is developed to use the modified 
Bardy Cross method of solving gas distribution analysis 
problems for low, medium and high pressure systems. The 
program is written to conserve aeaory area so as to accept 



ABTBOES: J. C. Irvin 



P. B. Armbrust, Jr. 



DIBECT TECBBICAL IBCOIRIES TO: 

P. H. Armbrust, Jr. 

D. S. Army Engineer District 

Corps of Engineers 

P.O. Box 1538 

Albuguergue, New flexico 87103 

DESCBIPTIOB - Determines heating-load reguirenents for 
a building, either new or existing, and whether or not 
air-conditioned or evaporative-cooled. Cooling-load 
determination for buildings. Input data is obtained from 
the cooling-load output sheets and/or from current Ashre 
guide and data books. Beat losses are calculated for 
individual rooms, with results of the various eguations 
being printed three rooms to the page. For each room, 
user has the option of obtaining (depending on design 
reguirements) , the room-entering air teaperature, the room 
air guantity, the water temperature difference, or the 
water guantity. 

PROGBABBIBG SISTEBS - Britten in DTO FOBTBAB. 

BIBIBOB SISTEB REQOIBEBENTS - storage used by program - 
13,067. Paper tape systea. 

BASIC PBOGBAB PACKAGE 

DOCOBEBTATIOB - Brite-up. 

BACBIBE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAB PACKAGB - Bone, 

OBDEBIBG IBFOBBATIOB: PBOGEAB BOBBEB 1620095011 

PBOGBAB NOBBER DISTBIBOTIOB BEDIOB OSEB V0L0BE 
EXTEBSIOH TYPE CODE REOOIBEBIBT 



BASIC none 

OPTIONAL none 



PT 
none 



05 



none 
none 



1620-09.5. 012 

GENERAL PIPE STRESS 



AUTHORS: E. J. Orth, Jr. 



Br. John Lewis 



DIRECT TECBBICAL IBQOIBIES TO: 
E. J. Orth, Jr. 
Southern Services, Inc. 

600 North 18th Street 
Biraingham, Alabama 35202 

DESCRIPTION - A four part pipe stress program is presented- 
1-Input edit, 2-flexibility matrix calculation, 3-Solution 
for branch point deflections, and a-conputation of stresses. 
The input edit program performs a rigorous error check 
on the data file. A monitor is output giving coordinates 
of each point. Data file consists of system topological 
data and, for each branch, coordinates of first point 
reference global origin, expansion and aovement data, 
coordinate differences between tangent intersections, and 
Bend radii. Data is keyed by 3 letter alphabetic codes. 
The flexibility matrix calculation applies the algorithm 
described in the supplement to Kellogg's book, "The Design 
of Piping Systems", second edition. The solution program 
allows for loops. It will handle 30 branches, 15 branch 
points, and. any number of anchors. Rigid stops, spring 
stops, and external forces may be oriented parallel to 
coordinate axes. The algorithm of Chen -Asme Paper No. 
59-APB-21- is used, with a novel approach to solution of 
the matrix to take advantage of sparsity. Result is 
deflections at branch points and reactions each branch, 
all regerence global origin. These are left in comaon 
storage, and program a called thru a link subroutine at 
completion of solution. The stress and deflection program 
computes for each point of each branch- 1. Deflections 
reference the point, 2. Restraining reactions reference 
the point, and 3. Combined stressed. Sun of restraining 
reactions about each branch point is also given. 



CONTRIBUTED PROGRAMS 



CONTINUED FROH PRIOR PAGE 

PBOGRAHHING SYSTEMS - Written in FORTRAN II mainline, with 
subroutine and function subprograms. 

MINIMUM SYSTEM REQUIREMENTS - A 60K card 1620 in FORTRAN 
II configuration. Conversion to 40K disk is possible, 
with major reprogramming. Peripheral eguipment - 
Reproducer, sorter, 407 E-8, keypunch. 

BASIC ERCGHAH PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL EEOGRAM PACKAGE - None. 



CONTINUED FROM PRIOR COLUMN 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K IBM 1620, 1622 
Card Read-Punch. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620097006 

Indicate n B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Fori. 



ORDERING INFOBMATION: PROGRAM NUMBER 1620095012 



PROGRAM NUMBER 

EXTENSION 



BASIC none 
OPTIONAL none 



DISTBIBUTIOB MEDIUM 
TYPE CODE 



DTE* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620-09.5.013 

CALCULATION OF CENTER OF GRAVITY^ POLAR M OMEN TS OF INERTIA 
MI hllUU DATA " * 



AUTHORS: William T. White 



June v. Grenier 



DIRECT TECHNICAL INQUIRIES TO: 

William T. White 
Royal McBee Corporation 
1031 New Britain Avenue 
West Hartford, Connecticut 

DESCRIPTION - Calculates the center of gravity, polar 
moments of inertia about the center of gravity and axis 
of rotation, radius of gyration of both center of gravity 
and axis of rotation, and the center of percussion in a 
two-dimensional case. The center of percussion is not 
calculated in a three-dinensional case. Progran is compiled 
and assembled with necessary subroutines. 

PBOGRAMMING SYSTEMS - Written in FORTRAN II. 

MINIMUM SYSTEM REQUIREMENTS - storage used by program- 
38460 digits. Card system, TNS, TNF, MF, Auto Divide, 
Indirect Addressing. Program can be used on lesser machine. 

BASIC PRCGEAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFOBMATION: PROGRAM NUMBER 1620095013 

Indicate "E N 1" in columns 1-3 ana the Program Number 
in columns 4-13 on the IBM Program Order Form. 



§Z 109 STRESS ANALYSIS OF A FLANGED TAPERED BUB 



1620 -09.7.00 7 

S TEAM AND WATER PROPERTIES AND EFFICIENCY PROGRAM 

AUTHOR: s. w. Lovejoy 

DIRECT TECHNICAL INQUIRIES TO: 
S. W. Lovejoy 

Electric Production Department 
Long Island Lighting Company 
175 East Old Country Road 
Hicksville, New York 

DESCRIPTION - The purpose of this program is to determine 
the thermodynamic properties of steam and water as reguired 
for calculation of a heat balance for a reheat turbine 
using field test data as input. In addition, the prograi 
will calculate the efficiency between any two points within 
the superheat region. Nearly all of 20K memory. 



memory 20K, 



MINIMUM SYSTEM REQUIREMENTS - Card system, 
and no other special features reguired. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620097007 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620-09.7.008 

WATER FLOW IN A PIPE NETWORK BY HARD! CBOSS S OLUTION 



AUTHOR: 



R. Wood 



AUTHOR: 



Wenrick 



DIRECT TECHNICAL INQUIRIES TO: 
R. C. Wenrick 
ACB Industries, Inc. 
P. 0. Box 1666 
Albuquerque, New Mexico 

DESCRIPTION - This program can be used tc size tapered 
sections used for damping the discontinuities produced 
at flange-shell junctures or can provide stress and 
discontinuity levels of existing designs, storage 30,0 
core locations. 40K, Automatic Divide. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NDMBEB 1620097005 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.7. 



JIPJAOLIC ANALYSIS OF FLOW IN PIPE NETWORKS 

AUTHOR: James w. Hunter 

DIRECT TECHNICAL INQUIRIES TO: 
James W. Hunter 
108 w. Second Street 
Los Angeles 12, California 

DESCRIPTION - Given any configuration of constant or 
variable head flow inputs pipe characteristics for each 
line consisting of the length, diameter, Hazen-Williams 
(c) coefficient, change in elevation and booster pump head 
given or trial flow in each pipe this program corrects 
the trial flows in pipes forming closed loops, computes 
head losses for every pipe and the pressure at each pipe 
junction. 

PROGRAMMING SYSTEMS - Written in FORTRAN. 



DIRECT TECHNICAL INQUIRIES TO: 
D. R. Wood 

Calgary power Limited 
140 - 1st Avenue West 
Calgary, Alberta 

DESCRIPTION - The IBM 1620 program, {distribution of Water 
Flow in a Pipe Network), (1620-09.7.001), solves the basic 
water flow problem but is limited because it was restricted 
to a 20,000 digit storage computer. This program has been 
rewritten with many modifications for a 40,000 digit storage 
computer. Some advantages of this program are: 1. A 
different Hazen-williaas coefficient can be used for each 
pipe eliminating the necessity of calculating an equivalent 
length of pipe for the one Hazen-Williams coefficient used. 
2. Output consists of the corrected flow in gallons per 
minute and, in addition, the resistance factor and resultant 
pressure drop for each pipe. 3. The accuracy control to 
stop calculations has been changed from (the sum of the 
absolute value of the correction currents for an iteration) 
to the maximum algebraic sum of the pressure drops (or 
error of closure) allowable around any one loop. 4. The 
larger storage allows the storing of the actual pipe numbers 
assigned and does not assume the seguential storing of 
the pipes thus allowing the same three digit number assigned 
to be used for the same pipe in all problems. The entire 
40,000 digits are used with the exception of the area from 
approximately 14,200 to approximately 24,000. 

PEOGRAMMING SYSTEMS - It was written in FORTRAN with Format 
Control and Automatic Divide. 

MINIMUM SYSTEM REQUIREMENTS - This program requires card 
input with a 40,000 digit storage computer. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620097008 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-09.7.012 

COOLING-LOAD DETERMINATION FOR BUILDINGS 

AUTHORS: J. w. Lafon R. M. Catanach 

DIRECT TECHNICAL INQUIRIES TO: 
J. W. Lafon 

U. S. Army Engineer District 
Albuquerque, New Mexico 

DESCRIPTION - Program determines cooling-load requirements 
(total and by individual rooms) for a building in which 



1620 



CONTRIBUTED PIOGBAHS 



CONTINUED FBOM PBIOB PAGE 

it is planned to install either a central-station air- 
conditioning system, individual air-conditioning units, 
or an evaporative cooling system, confutes grand-total 
heat leads for five selected times of day and, using time 
which corresponds to maximum heat-load as design time-of- 
day, types individual calculations for each room. User 
has option of computing either the sensible heat-factor 
and air quantity for a duct system, or the GPM requirements 
for a chilled-»ater system. Generally, program follo»s 
the methods outlined in 1963 Ashrae Guide and Data Book, 
solution factors based on 95 degrees DB, automatically 
corrected. Bestrictions/Bange - Provides for seven common 
types of .all, five roof types. 

PROGRAMMING SYSTEMS - Britten in 0T0 FOETBAB. 

MINIMUM SYSTEM EEQUIBEHENTS - Equipment required - Paper 
Tape I/O. 19,951 positions of core. 

BASIC PBOGBAB PACKAGE 

DOCUBEBTATION - «rite-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - Bone. 

ORDERING INFORMATION: PBOGRAB NUMBER 1620097012 

PROGBAH BOBBER DISTRIBUTION BEDIOH OSEB VOLUME 
EXTENSION TIPE CODE REQUIREMENT 



162BzlSUli2& s IS 

TRANSPORTATION PBOGBAB FOB THE IBB. 1620 

AUTHOR: J.H. Boles 

DIBECT TECHNICAL INQUIRIES TO: 
J.N. Boles 

University of California 
207 Giannini Ball 
Berkeley <t, Calif. 

DESCRIPTION - This program is a simple adaptation of the 
Transportation Program for the IBH 1620 (tape) by Badden 
and Smith, (1620-10.1.003). It provides an optional solution 
to the linear programming transportation problem. 



BIBIBOB SYSTEB RIQUIREBEBTS - Bemory 20k, 
Punch. 



1622 Card-Bead- 



BASIC PROGBAB PACKAGE 

DOCUBEBTATION - Write-up on Bicrofiche only. 
BACBIBE BEAEABLE - None. 

ORDERING IBFORBATION: PROGRAB NOBBEB 1626101005 

Indicate "B N 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBB Program order Form. 



BASIC none 
OPTIONAL none 



PT 
none 



none 1620-10.1.007 

£181*1! PROGRAMING I 

none 

AUTHOR: F.W. Hood 



l£20 = 09. s 7..ejjt 
STRESS 



AUTHORS: R 



Goodman 
L. c. league 



G. Mazzota 



DIRECT TECHNICAL INQUIRIES TO: 
B. V. Goodman 
H. I. T. 
Room, 1-075 
Cambridge, Massachusetts 

DESCRIPTION - 1620 STBESS is a subset of the 709a STRESS, 
a problem-oriented language for the analysis of structures. 
Five types of structures may be analyzed for gross member 
end forces, joint displacements, and reactions. They are 
planar or space trusses, planar or space frames, and plane 
grids. The method used is a matrix formulation of the 
stiffness method. The restrictions on 1620 STBESS (as 
opposed to 7090 STBESS) are - no modifications, no non- 
prismatic members, only tabular form of all statements, 
and maximums of - 99 joints, 200 members, 20 joint release 
components and 100 start released members. STRESS reguires 
an entire disk pack which does not contain monitor of an 
SPL, thus no programs other than STRESS nay reside on the 
pack. STBESS was developed on a 60K, 2 drive. Floating 
Point hardware. Mod I 1620 with the earlier version of 
Monitor I. The machine also had TBS, INF, BF, Auto Divide, 
and Indirect Addressing, card I/O was used, with some 
messages on the typewriter. 

BASIC PSOGBAB PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - Bone. 

OBDERING INFORMATION: PBOGRAB NOBBEH 1620097014 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



i620;j0ijiiji 

MXV EROGRAM FOR LINEAB PBOGBAB MATBIX PBEPARATION 



AUTHOR: 



E.I. Botte 



DIRECT TECHNICAL INQUIRIES TO: 
E.I. Botte 

union oil Co. of California 
oleum Befinery 
Rodeo, Calif. 

DESCBIPTION - This program performs a matrix by vector 
multiplication to prepare a linear program input vector. 
The range of multiplication, vector number assigned to 
output vector, and ID of output vector are all controlled 
by control cards which may be interspersed with matrix 
loading. Program stored in locations 00000 to 02690. 

MINIMUM SYSTEM REQUIBEMENTS - IBM 1620, 20K, Indirect 
Addressing card input/output. 

BASIC EBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Bicrofiche only. 
BACBINE READABLE - None. 

OBDEBING INFOBBATIOB: PROGRAM NUMBER 1620101001 

Indicate n E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
F. B. Hood 

Brown 8 Hilliamson Tobacco Corp., 
1600 «. Hill St., 
Louisville, Kentucky 40201 

DESCBIPTION - This program maximizes or minimizes a linear 
functional subject to a set of linear restrictions, by 
finding a set cf non-negative numbers for the variables 
in question. 

PROGRAMMING SYSTEMS - Written in FORTBAB with Format. 

MINIMUM SYSTEM BIQBIREBEnTS - A 1620 with no special 

features required. 

BASIC PBOGBAB PACKAGE 

DOCUBEBTATION - Write-up on Microfiche only. 
HACHIBE READABLE - Bone. 

ORDERING INFORMATION: PSOGBAB NUMBER 1628101007 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



LINEAB PROGRAMMING 

AOTHOR: F. W. Wood 

DIBECT TECHNICAL INQUIRIES TO: 
F. W. Wood 

Brown S Williamson Tobacco Corp., 
1600 w. Bill St., 
Louisville, Kentucky 40201 

DESCRIPTION - This program maximizes or minimizes a linear 
functional subject to a set of linear restrictions, by 
finding a set of non-negative numbers for the variables 
in question. 

PROGRAMMING SYSTEMS - Written in FORTRAN with Format. 

MINIMUM SYSTEM BEQOIREBENTS - FORTRAN with Format and no 
other special feature required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACBIBE BEADABLE - Hone. 

ORDERING INFORMATION: PROGRAM BOMBER 1620101008 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620 = l0i:ujm is 

ECONOMIC OBDEB QUANTITIES FOR LINEAE DEMAND FUNCTIONS 

AOTHOB: A. Diegel 

DIBECT TECBNICAL IBQOIEIES TO: 
A. Diegel 

Sr. Lecturer in Hgmnt. 
Univ. of Otago 
Dunedin, New Zealand 

DESCBIPTION - The program determines optimal order 
quantities, minimum inventories, and optimal delivery times 
for sequences cf lots designed to meet linear demand 
functions of the general form Y equals A 6 BX. It replaces 
the traditional economic order quantity formula which 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOE PAGE 

applies only to the special case of constant demand (where 
the demand function would be of the general form Y equals 
A) . Mathenatical method- the program itself uses only 
algebra. 

PBOGBAHMING SYSTEMS - Written in FORTRAN with Format. 

MINIMUM SYSTEM REQUIREMENTS - Basic 1620 FORTRAN with 
Format Floating Point. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Bicrofiche only. 

MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620101011 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620-10.1.012 

OUTPUT AHAI1SIS FOE LINEAR PROGRAMMING 



AUTHORS: J. H. 
J. C. 



Stafford 
Snyder 



B. N. Taylor 



DIRECT TECHNICAL INQUIRIES TC: 
J. H. Stafford 
Purdue Univ. 
Lafayette, Ind. 

DESCBIPTION - This routine is designed to edit the solution 
to a linear programming problem into a completely self 
explanatory table. Coded variable and problem 
identifications are decoded. Scaled variables are unsealed. 

PROGRAMMING SYSTEMS- FORTRAN II, Mainline, complete. Other 
programming language- Machine language. 



Storage used by programs- 



MINIMUM SYSTEM BEQUIBEMENTS 
55,038 digits. 

BASIC EBOGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620101012 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBM Program Order Form. 



1620-10.1.013 

LINEAR PROGRAMMING 



CONTINUED PROM PRIOR COLUMN 

management in short-run decisions and long-range planning 
in a course of 25-35 class meetings over a semester or 
an academic year. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K with card I/O. 
Indirect Addressing, Automatic Divide, and optional 
instruction MF-71. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PBOGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620102005 



BASIC 
OPTIONAL 



PROGRAM NUMBER 
EXTENSION 



none 
none 



DISTBIBUTION MEDIUM 
TYPE CODE 



DTB* 
none 



USEB VOLUME 
BEQUIBENENT 



none 
none 



1620-10.2.007 

EXPONENTIAL SMOOTHING PBOGBAM 

AUTHOR: W. N. Smith 

DIRECT TECHNICAL INQUIRIES TO: 
W. N. Smith 
Dow Chemical Company 
Freeport, Texas 

DESCBIPTION - Exponential Smoothing is a basis for 
statistical forecasting. It is based on the assumption 
that the most recent result from a time series is the most 
important with regard to forecasting. The method 
effectively assigns geometrically decreasing weights to 
older data. 

PROGRAMMING SYSTEMS - Britten in FORTRAN with Format. 

MINIMUM SYSTEM REQUIREMENTS - 40K memory. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620102007 

Indicate "B N 1 M in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOR: 



B. Gallup 



DIRECT TECHNICAL INQUIRIES TO: 
B. Gallup 

KSTC Computer Center 
Emporia, Kansas 66601 



1620-10.2^08 

'EXPONENTIAL SMOOTHING II0RECASTING1 



DESCBIPTION - This program 
problems using the simplex 
artificial variables and n 
optimal feasible solution 
that the user has to do is 
variables a sub IJ, the co 
the requirements B sub J. 
is punched out along with 
the basic variables. The 
be solved isOn a 20K Machi 
On a 40K Machine, 31 eguat 
a 60K Machine, 10 equation 



selves Linear Programminq 

algorithm. All the identities, 
ecessary changes to obtain a 
are added by the program, all 

enter the coefficients of the 
st coefficients C sub J, and 

the optimal feasible solution 
the cost, basis vectors and 
maximum size problem that can 
ne, 18 equations and 18 variables, 
ions and 31 variables, and On 
s and 40 variables. 



PROGRAMMING SYSTEMS - Britten in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Card system. Automatic Divide, 
indirect Addressing, Floating Point hardware, TNF and TNS 
instructions. 

BASIC PBCGBAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620101013 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10.2.005 

BOSTON COLLEGE DECISION -MAKI NG EXERCISE 



AUTHOR: Jonas Rabin 

DIRECT TECHNICAL INQUIRIES TO: 
Jonas Rabin 

Western Electric Company, Inc. 
P.O. Box 900 
Princeton, New Jersey 

DESCRIPTION - This is a Forecasting Program based on the 
fundamental theorum of Exponential Smoothing, by Robert 
G. Brown and Richard F. Meyer of the Arthur E. Little 
Company, Cambridge, Massachusetts. Tape system memory 
20K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620102008 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10.2.009 



PRODUCTION MANPOWER GAME 



AUTHOR: J. J. Bachhuber 



AUTHOR: 



John E. Van Tassel 



DIRECT TECHNICAL INQUIRIES TO: 
John E. Van Tassel 
Eoston College 

Graduate School of Business Administration 
Chestnut Hill 67, Massachusetts 

DESCBIPTION - A general management interaction simulation, 
an outgrowth of the original IBM 650 Management game. 
This exercise is designed primarily for educational use 
in teaching participants to appreciate the 
interrelationships of production, distribution and financial 



DIRECT TECHNICAL INQUIRIES TO: 
J. J. Bachhuber 

Supervisor of Machine computation 
Institute of Paper chemistry 
Appleton, Wisconsin 54910 

DESCBIPTION - The purpose of the Production-Manpower Game 
is to demonstrate how a computer can aid in making complex 
decisions quickly and consistently. The game is played 
by two teams of executives, using decision rules of their 
own choice, and by the computer using a programmed decision 
rule developed from experience with this type of operation. 
The participants act as production executives of a paint 
company, who must decide each month how many thousand 
gallons of paint should be made to fill expected orders 
and what size work force must be maintained to meet this 
production. The decisions will be based upon the forecasted 
orders, the current manpower, and the current inventory. 
Method Linear decision rule for production and employment 
scheduling. Storage used by program- 19737 core locations. 



CONTRIBUTED PROGRAMS 



CONTINUED FBOH PBIOB PAGE 

PROGRAMMING STSTEHS - Britten in FORTRAN 

MINIMUM SYSTEM REQUIREMENTS - Card system. Auto Divide. 
Program can be used on lesser machine requirements that 
can be easily removed- auto Divide - by recompiling using 
SEIT FCBTBAN. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGBAM PACKAGE - None. 

OBDEBING INFORMATION: PROGRAM BOMBER 1620102009 

PBOGBAH NUMBER DISTRIBUTION MEDIUM OSES VOLTIHE 
EXTENSION TYPE CODE REQUIREMENT 



16 20-10. 2.013 
SADSIH 



ADTHOB: 



BASIC none 
OPTIONAL none 



DTB* 
none 



none 
none 



16 20^1i.2.0l0 

IlBH OPERATION. SIMULATOR AND FABH HAMGEHENT DECISION 
EXEBCISE 



B. L. Claeson 



ADTHOB: 



L. M. Eisgruber 



DIBECT TECHNICAL INQUIRIES TO: 
Prof. C. H. Davidson 
Director 

Engineering Computing Laboratory 
University of Wisconsin 
Madison, Risconsin 53706 

DESCRIPTION - SADSIM is a FOBTEAN program which simulates 
a hypothetical single address decimal computer designed 
for instructional purposes. SAD has a 1000 word memory, 
with 5 decimal digits plus sign in each word. The complete 
instruction set contains 26 instructions. Subsets of 15 
or so lend themselves easily to learning processes. Program 
requires 1620 Hodel I or Model II card system with 40K 
or more. Programmed in FORTRAN II. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Nrite-up on Hicrofiche only. 
MACHINE BBADAELE - None. 

OBDEBING INFOBHATION: PBOGBAH NUMBEB 1620102013 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBH Program Order Form. 



DIBECT TECHNICAL INQUIRIES TO: 
L. H. Eisgruber 
Purdue University 
AES Annex 

School of Agriculture 
Lafayette, Indiana 47907 

DESCRIPTION - The program may be used for simulation as 
well as for operational gaming. Gaming may be executed 
either in non-competitive or competitive mode although 
the latter can only be accomplished by some degree of 
manual interference during computer processing of team 
decisions, simulation and gaming may be either 
deterministic or stochastic. The program does not limit 
simulation or gaming to a predetermined set of enterprises, 
farm size, price situations. To introduce entirely new 
enterprises, or new technology for already considered 
enterprises, only the respective coefficients and/or 
alphabetic descriptions need to be changed. 

PBOGBAMMING SYSTEMS - Britten in FORTRAN II. 

MINIMUM SYSTEH REQUIREMENTS - Card system, THS, TNF, HF 
Auto Divide, Floating Point hardware and an 80/80 listing 
device (e.g. IBH 402 or 407). 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE EEADABLE - Appropriate material delivered. 

OPTIONAI PBOGBAM PACKAGE - None. 

OBDEBING INFORMATION: PROGBAM NUMBER 1620102010 

PROGRAM NUHBEB DISTRIBUTION MEDIUM USEB VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



OPTIONAL none 



1620-11.2. E12 

GENERAL SYSTEMS SIMULATOR 

AUTHOR: B. P. Kartschoke 

DIRECT TECHNICAL INQUIBIES TO: 

Prof. C. B. Davidson 

Eirector 

Engineering Computing Laboratory 

University of Wisconsin 

Madison, Wisconsin 53706 

DESCBIPTION - This General Systems Simulator Program is 
capable of simulating systems which manipulate units of 
traffic. Typical traffic might be people, telephone calls, 
or automobiles in a system such as a cafeteria line, a 
telephone exchange, or an automobile tunnel, respectively. 
Briefly, traffic enters the system, encounters various 
delays, and then leaves the system. 

PROGRAMMING SYSTEMS - Britten in SPS 

MINIMUM SYSTEM REQUIREMENTS - 60K or more. Card input- 
output. Automatic Divide, Indirect Addressing, special 
instructions TNS, TNF, and MF. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAH NUMBER 1620102012 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10.3.006 *J 

£M1 Z IliQGRAH EVALUATION AND REVIEW TECHNIQUE 

AUTHORS: John c. Patton Frank H. White 

DIRECT TECHNICAL INQUIBIES TO: 
J. c. Patton 
IBM corporation 
1220 19th Street, N.W. 
Washington 6, D.C. 

DESCRIPTION - To allow 1620 users to utilize project 
planning and scheduling concepts. The 1620 Pert Program 
combines least cost estimating and scheduling with the 
determination of the risk involved in attempting to complete 
a total project *or any part thereof* within assigned 
completion times. The program allows negative slack times 
to be produced for the determination of other existing 
critical paths. Projects may be planned, scheduled, 
monitored and changed with this program. No node may be 
numbered 000 or may be above 999. For a 20K machine, the 
sum of the number of the highest numbered node and the 
number of jobs must be 1672 or less. To work in conjunction 
with part II, the sum of twice the number of jobs plus 
the highest numbered node must be 3100 or less in addition 
to the previous requirement. Node numbering is completely 
random. 

PROGRAMMING SYSTEMS - Written in SAS. 
MINIMUM SYSTEM REQUIREMENTS - 20K for the above 
requirements. 40K for 3672 6 7100 respective. 60K for 
5672 6 11000 respective. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

OBDEBING INFORMATION: PROGRAM NUMBER 1620103006 

PROGBAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



BASIC none 
OPTIONAL none 



DTR* 
none 



none 
none 



1620-10.3.009 

PERT 



AUTHORS: Bob N. Manning 



Wes Folsom 



DIBECT TECHNICAL INQUIBIES TO: 
Bob N. Manning 

Goodyear Aircraft Corporation 
Arizona Division 
Litchfield Park, Arizona 

DESCRIPTION To calculate the critical path cf any project, 
and the earliest and latest start and finish times for 
each activity and the total and free float times. The 
probability of meeting a predetermined scheduled date is 
also computed. Tape system, memory 20K 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PROGRAH NUMBER 1620103009 



Indicate M 
in columns 



) N 1" in columns 1-3 and the Program 
4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



1620-10.3.010 

JCOSCBIC ANALYSIS OP PLANS = OUTPUT 1 AND OUTPUT 2 



*B 1620-10.3.016 



OK Z KEYWORD IN CONTEXT 



AUTHOR: 



A.B. Calsetta 



DIRECT TECHNICAL INQUIRIES TO: 
1 E. Calsetta 

Long Island lighting Company 
175 Ola Country Road 
Hicksville, New York 

DESCRIPTION - This program calculates the economics of 
long range plans. It consists of two subprograms which 
conpute output data in the following forms Output 1-a 
tabular summary of capital additions, operating expenses, 
and present worth of cumulative annual charges for each 
long range plan. Output 2-present worth of cumulative 
annual charges of from two to eight separate categories 
♦or types of capital additions* within each long range 
plan. 



PROGRAMMING s j stems 

Format. 



written in FORTRAN Language with 



MINIMUM SYSTEMS REQUIREMENTS - Card system, memory 20K, 
and no other special features required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
BACBINE READABLE - Rone. 

ORDERING INFORMATION: PROGRAB RUBBER 1620103010 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Prograa Order Forn. 



1620-10.3.014 

PERT DATING ROUTINE 

AUTHOR: Irving c. Zacher 

DIRECT TECHNICAL INQUIRIES TO: 
Irving C. Zacher 
Botorola, Inc. 
110 N. Cicero Avenue 
Chicago 51, Illinois 

DESCRIPTION - Britten to operate in conjunction with a 
aodified version of the 1620 Pert Prograa, 1620-10.3.009). 
The prograa provides calendar dates for the predicted, 
or early finish date (te) and the latest finish date (tl) . 
The calculation of dates is based upon a zero date or 
current date entered by the programmer. Switch options 
provide for critical path runs, displaying only the 
activities on the crtical path, and for updating runs. 
A header fornat is provided, as well as automatic spacing 
from page to page to provide a uniform format for all 
pages. Paper tape 1/0, memory 20K and no other special 
features required. 

BASIC PROGRAB PACKAGE 

COCDBENTATION - write-up on Bicrofiche only. 

MACHINE READABLE - None. 
ORDERING INFORHATION: PROGRAB NDBBEB 1620103014 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



AUTHOR: 



Botte 



DIRECT TECHNICAL INQUIRIES TO: 
E. I. flotte 

Union Oil Company of California 
Oleum Refinery 
Rodeo, California 

DESCRIPTION - This program prepares a title card for the 
original title and for each key word in the title. Each 
key word is specified by a record mark. Storage 
requirements - 1,848 digits. Equipment specifications- 
Memory 20k, Indirect Address, cara input/output, card 
system. Programmed in SPS two pass. 

BASIC PROGRAB PACKAGE 

DOCUMENTATION - Write-up on Bicrofiche only. 
MACHINE READABLE - None. 

ORDERING INFORBATION: PROGRAB BUBBER 1620103016 



Indicate **I 
in columns 



N 1" in columns 1-3 and the Program Number 
4-13 on the IBM Prograa Order Form. 



1620-10. 3. en *■ 

STUDENT SCHEDULING TECHNIQUE USING DEFINED INCREMENTS OF 
TIME 

AUTHORS: I. K Lukey D. A. Hubbard 

DIRECT TECHNICAL INQUIRIES TO: 
I. K. Lukey 
IBM Corp. 

1602 Nest Third Avenue 
Flint 4, Michigan 

DESCRIPTION - The purpose of the program Student Scheduling 
Technique Using Defined Increments of Time is to schedule 
students to a previously established master schedule in 
educational institutuions. The program involves logic 
which makes it very suitable for both secondary schools 
and colleges. The most significant feature in this 
particular code is a defined time module which allows 
complete flexibility in scheduling any period of time 
during any day for any or all days of the week. 

PROGRAMMING SYSTEMS - Britten in synbolic language. 

MINIMUM SISTEM REQUIREMENTS - The program student requires 
a card 1620 with 20K memory. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up. 

HACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620103017 



BASIC 
OPTIONAL 



PROGRAM NUMBER 
EXTENSION 



none 
none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTP* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620-10.3.015 

AUTOSPOT POST 
TYPE 

AUTHOR: R. L 



PROCESSOR FOR MILWAUKEE - BATIC 11 TDEE 



Merrian 



1620M0.3.020 

CRITICAL PATH/SCHJDULJ BAR GRAPH GENERATO R PROGRAB 



DIRECT TECHNICAL INQUIRIES TO: 
R. L. Merriam 
N/c Training Department 
Kearney 6 Trecker Corp. 
11000 Theodore Trecker Bay 
Best Allis 14, Bisconsin 

DESCRIPTION - The Post-Processor accepts general autospot 
record-type output and converts it to information meaningful 
to the Hilaaukee-Hatic 11 tube machine tool. The post- 
processor nay be used with either the 8-position or infinite 
position table index configuration. The output is in card 
form. To produce a tape, the cards must be run through 
an off-line card to tape converter. The program may be 
used for estimating purposes since the time per line 
information as well as the total cycle tine on the 
Milwaukee-Hatic is coaputed. Memory 20K- Indirect 
Addressing and Divide hardware required. No other features 
required. Card input-output SPS language used. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAB RUBBER 1620103015 

Indicate "E N 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBB Program Order Form. 



AUTHOR: 



Donald C. Balker 



DIRECT TECHNICAL INQUIRIES TO: 
D. C. Walker 
Dravo Corporation 
Computer Services Departaent 
Building N-2 
Pittsburgh 25, Pennsylvania 

DESCRIPTION - To represent a large volume of numerical 
output data from the (less) , critical path program in 
bar graph form. Latest finish may not be greater than 
day 430. 39,304 digits of memory. Transfer numerical 
strip (TNS-72) instruction. This program may easily be 
adapted and recompiled for graphing activities with a 
latest finish beyond day 430. The procedure is described 
in detail within the contents of the prograa write-up 

PROGRAMMING SYSTEMS - Britten in SPS 

MINIMUM SYSTEM REQUIREMENTS - 40K, 39.304 digits of memory. 

BASIC PROGRAB PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAB NUMBER 1620103020 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



CONTINUED FBOH PEIOB COLUMN 



1620-10.3.021 

INVESTMENT COST 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Fori. 



A0TH0R: 



Coombe 



DIRECT TECHNICAL INQUIRIES TO: 
L. ». Coombe 

Computer Application Engineer 
The Detroit Edison Company 
2000 Second Avenue 
Detroit 26, Michigan 

DESCBIPTION - The purpose of this program is to calculate 
an equivalent uniform annual cost for a series of 
investments. The progran allows for variable fixed-charge 
rates, variable escalation rates, negative escalation, 
removal of investment charges and modification of 
investments fixed charge rates. The present worth method 
of economic comparison is used. A maximum of 200 
investments and 100 fixed charge rates is allowed. 00000- 
12414 20K memory. Automatic Divide, Indirect Addressing. 
Machine language- SPS, Fixed Point. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBING INFORMATION: PBOGBAH NUMBER 1620103021 

Indicate "E N 1 M in columns 1-3 and the Erograa Number 
in columns 4-13 on the IBM Program Order Form. 



16201:1^.3^24 

SEASONAL ADJUSTMENT PBOGBAM 



AUTHOR: 



S. Groman 



DIBECT TECHNICAL INQUIBIES TO: 
S. Groman 
Budget Department 
D. S. Borax and Chemical Co. 
3075 Wilshire Blvd. 
Los Angeles, California 

DESCBIPTION - Adjust economic data for seasonal variations. 
User is better able to utilize his resources to compensate 
for Seasonal Variations aids in interpeting economic data 
having a seasonal pattern parameter control and twelve 
month moving average. Restriction, range- up to 11 
sequential years of data-input in form of monthly data 
bi-monthly data or guaterly data-variances between 1 and 
99 mills first half year and last half year of data lost 
for output purposes. Output via punched cards. 

PBOGBAMMING SYSTEMS - Written in FORTRAN II. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 with 60K, Automatic 
Divide and card I/O. 

BASIC PBCGBAM PACKAGE 

COCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFOEMATION: PBOGBAM NUMBER 1620103024 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20-1 0.3.03 1 *M 

PERT-LSSS 

AUTHOB: L. Standlee Steenrod 

DIRECT TECHNICAL INGUIRIES TO: 

L. Standlee steenrod 
computer Research Center 
University of Missouri 
Columbia , Missouri 

DESCRIPTION - This is a Critical Path Program devised to 
compute schedules of paths and their associated least cost 
through a network of activities of a large project. The 
schedules are generated between the projects normal time 
and crash time and each contains start and finish times, 
costs and floats for each activity. These schedules enable 
a time and its associated least cost to be chosen. This 
program is a modification of SHARE program 1188 PA GMCP 
program consists of two (2) decks. Deck I gives 
intermediate output, deck II gives final output for listing. 

PROGRAMMING SYSTEMS - Britten in FOBTEAN II, 

MINIMUM SYSTEM BEQUIREMENTS - A 160 with 60K, Auto Divide, 
Indirect Addressing and Floating Point hardware. Program 
can be used on lesser machine if dimensions are reduced 
or part of labeling in program deck 2 is removed. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

HACBINE BEADABLE - None. 

ORDEBING INFORHATION: PROGRAM NUMBER 1620103031 

Indicate "B N 1" in columns 1-3 and the Progran Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10.3.032 

ZIP - KEYWORD IN CONTEXT ANALYSIS ON £ MULTIPLE LINE 
ABSTRACT 

AUTHOR: Thomas J. Scott 

DIBECT TECHNICAL INQUIRIES TO: 
Sun Oil Conpany 
1608 Walnut Street 
Philadelphia, Pa. 

DESCBIPTION - The program will: 1) Accept a multi-card 
abstract (paragraph, etc.) according to a format designated 
by the user. 2) Bearrange this abstract according to 
a second, or output format (also designated by the user). 
3) Then cross reference the abstract by keywords (single 
or multiword) that appear either in the abstract itself 
or immediately following the abstract on a special keyword 
card. 4) Produce the following output: 

a. Reader or keyword title card. 

b. The rearranged abstract. 

c. A referenced card, giving the abstract source, 
location, etc. 

d. A blank card. 



1620310.3^030 

CR ITICA L PATH NODE AND DUMMY ASSIG NMENT TECHNIQUE PROGRAM 



AUTHOR: 



J. Srodawa 



DIRECT TECHNICAL INQUIRIES TO: 
B. J. Srodawa 
Computer Center 
University of Detroit 
Detroit, Michigan 

DESCBIPTION - A list of the jobs which must be performed 
before the job in question, time duration and costs for 
each job. It then assigns node numbers, generates any 
needed dummies, and punches out an output deck which can 
be used as input for 1620-10.3.011. The restrictions are 
that 3AS4BS4CSID must be less than 3022, where A is the 
number of jobs, B is the number of prerequisites, C is 
the number of jobs with no prerequisites, and D is the 
number of jobs not used as a prerequisite. Add 5000 to 
the upper limit for every additional 20K of memory. 
Equipment required - Card system, can be used on lesser 
machine. I/O devices can be changed to fit machine 
configuration. Additional Remarks - This program generates 
input to program 1620-10.3.011 (Hiss Less) by Ray N. Sauer. 
The sample II job is processed by CENAT in about 35 seconds. 

PROGRAMMING SYSTEMS - Sritten in SPS 1620/1710. Mainline, 
complete. SPS listing with machine code. 

MINIHUH SYSTEM REQUIREMENTS - A 1620 with 20K-100K. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAM NUHBEfi 1620103030 



One set of output described will be punched for each key 
word, provision is made for sorting all cards. Processing 
time is a function of the length of abstract and the number 
of keywords selected. For example, a 10-card abstract 
(input) with 5 key words reguires approx. 8 seconds of 
processing (incl. read time) and 45 seconds of card punch 
time. Both input and output formats can be changed by 
varying some 4 constants, located at the beginning of the 
SPS deck, and reassembling. 

PBOGBAMMING SYSTEMS - Written in SPS. 

MINIHUH SYSTEH REQUIREMENTS - Those required for card 
system Indirect Addressing SPS-1620/1710. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFOEHATION: PRCGRAH NUHBEE 1620103032 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20-10. 3.033 

KWIC INDEX WITH FOEHAT 

AUTHOB: Bichard L. storrer 

DIRECT TECHNICAL INQUIRIES TO: 
Richard I. Storrer 
The Norwich Pharmacal Company 
Norwich, New York 

DESCRIPTION - This program prepares KWIC-type permutations 
of input cards, especially titles and keywords comprising 
a document reference file. Program control allows any 



CONTRIBUTED PROGRAMS 



CONTINUED FECH PEIOE PAGE 

arbitrary input format. Off-line sorting and listing of 
output is reguired. Keyword is punched in center of card, 
and remainder of input is wrapped around with document 
reference, if specified, right justified to column 80* 
Provides for deletion of trivial words specified in list 
which may be easily altered by user. 

BIHIMOM SYSTEM REQUIREMENTS - 20K card machine with no 
special features. Storage used by program 5500. Eguipnent 
required by program card system sps 1620/1710 Mainline, 
complete. 

BASIC PHOGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE EEADABLE - Hone. 

OBDEEING INFORMATION: PBOGBAM NUMBEB 1620103033 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



EOBTFOIIO SELECTIONS - DIAGONAL MODEL (40Kfc 

AOTHOfiS: Pao L. Cheng Hugh B. Gardner 

DIRECT TECHNICAL INQUIEIES TO: 
Prof. Pao Lun Cheng 
School of Business Administration 
University of Massachusetts 
Amherst, Mass. 

DESCBIPTION - The use of a simplified model to trace a 
critical line of efficient portfolio diversification. 
Mathematical method-diagonal model. Bestrictions, range- 
80 securities may be processed. 

PROGRAMMING SYSTEMS - Britten in FOBTRAN II. 

MINIMUM SYSTEM REQUIREMENTS - 40K, Automatic Divide, 
Indirect Addressing. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEEING INFOBHATION: PROGRAM NUMBER 1620103035 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10.3.03? *M 

CAPITAL INVESTMENTS 

ADTHOB: John D. Baithel 

DIRECT TECHNICAL INQOIEIES TO: 
Dr. A. A. J. Hoffman 
Director Computer center 
Texas Christian University 
Fort North, Texas 

DESCBIPTION - This program is able to determine earnings, 
depreciation, interest, cash flow (the additional amount 
of cash money which the investment makes available) , salvage 
value, the rate of return, and the probability factor of 
the proposed investment each year through its maximum 
service life. There are several ways in which management 
computes each of the above. The capital investment program 
offers a choice of the more common methods involved in 
each computation. 

PBOGBAMMING SYSTEMS - AFIT-FORTBAN. Language used in the 
writeup - FOETBAN I-A.FIT. This program was written so 
that the Capital Investment Program 1620-CS-01X could be 
run on a 20K 1620 instead of the 40K required by the IBM 
program. 



CONTINUED FEOM PBIOR COLUMN 



AUTHOR: 



Barren Brisley 



DIRECT TECHNICAL INQUIRIES TO: 
Barren Brisley 

Newcastle University college 
Tighes Hill, N.S.B. 
Australia 

DESCRIPTION - The program was originally written for 
language and literature studies, to produce an 
alphabetically ordered list of words in a given text, 
together with the line or page numbers of occurrence for 
each word. It will produce word lists for large texts 
using minimal 20K with tape reader, dealing with an alphabet 
of up to 35 letters on single character coding. It is 
easily modified to deal with a text already on card or 
disc file, and, or to take any advantage of 40K or 60K 
or disk if available, storage used -02615. 

PBOGBAMMING SYSTEMS - Language used - SPS. Small 
modification to take advantage of non-tape system and, 
or non-tape text. 

MINIMUM SYSTEM BEQUIREHENTS - Minimal paper tape system 
with indirect Addressing. The requirement of paper tape 
easily removed. SPS or SPS - 1620/1710. Mainline - 
complete program. 

BASIC PBOGRAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBEB 1620103038 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10.3.039 *j 

STUDENT SCHEDULING SUPP1EHENTABY PEOGBAM 

AUTHOB: Bobert A. Murphy 

DIBECT TECHNICAL INQUIRIES TO: 
B. M. Meyers 
IEM Corporation 
1933 Fifth Avenue 
Seattle, Washington 98101 

DESCBIPTION - A series of programs designed for use with 
11 "scheduling techniques using defined increments of 
time." Program Number 1620-10.3.017. Program 1 - Tallies 
student's request by sex, grade level, and total requesting 
each course. Determines number sections required, based 
on a standard section size, for each course. Card output 
80-80 list. Program 2 - Potential conflict matrix for 
up to 99 courses. Analyzes students requests for 
combinations of selected courses. Builds a matrix showing 
number of students reguesting each combination. One pass, 
card output 80-80 list. Program 3 - Schedule priority 
rearranges student requests into a pre-established priority 
sequence and punches new student reguest card. Beduces 
throughput time and false conflicts. Program 4 - Punch 
seats remaining after scheduling. Cards are punched in 
master schedule format for use by school personnel or for 
scheduling in increments. 

MINIMUM SYSTEM BEQUIREHENTS - All programs require IBM 1620, 
20K with no special features. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up. 
MACHINE EEADABLE - Object decks. 

OPTIONAL PBOGBAM PACKAGE 
DOCUMENTATIOH - None. 
MACHINE BEADABLE - Source. 



Sample problem. 



OBDEEING INFORMATION: PROGRAM NUMBER 1620103039 



MINIMUM SYSTEM REQUIREMENTS 
card system. Auto Divide. 



Storage used by program-20K, 



PROGRAM NUMBEB 
EXTENSION 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up. 

MACHINE BEADABLE - Source program punch. Source 
program, print. Sample data. Sample data punch-out. 

OPTIONAL PROGRAM PACKAGE 

DOCUMENTATION - Brite-up. 

MACHINE BEADABLE - Object program, punch. Object 
program print. 

OBDEBING INFORMATION: PROGRAM NUMBEB 1620103037 



BASIC none 
OPTIONAL none 



DISTEIBDTION MEDIUM 
TYPE CODE 



DTE* 
DTB* 



USER VOLUME 
BEQUIBEMENT 



none 
none 



1620^0.3.040 

IUK - HEEKiX SCHEDU1E USING MASTER SCHEDULE 



AUTHOR: 



C. Trivedi 



PROGBAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 
REQUIREMENT 



DIRECT TECHNICAL INQUIRIES TO: 
M. C Trivedi 

Agricultural S Technical Institute 
State University of New York 
Alfred, Hew York 14802 



OPTIONAL none 



1620210.3^038 

ALPHABETIC INDEXES AND LISTEB FOB CONCORDANCES. 

AND DICTIONARIES 



GLOSSARIES^ 



DESCRIPTION - The main purpose of the program SEEK is to 
prepare a weekly schedule for a student using a pre-prepared 
master schedule and for student requests specifying each 
section of the course. Besides the principal use, the 
program WEEK may be used to check conflicts. It may be 
used for a maximum of any six days of a week. The day 
left must be uniform (same) for the institution. A class 
day may be started at any tine of the day and may be 
continued for as many as nine consecutive hours with an 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOB PAGE 

increment of one hoar. e.g. start at 8 a. a. and end at 
5 p.m., i.e. the last class is from 4 p.m. to 5 p. a. The 
program week accepts student's requests as punched on a 
student request card (one card per student) , f oris the 
weekly schedule, indicating various types of errors, if 
any, and then works as directed by the sense switches 
settings. There is no linit to the number of students 
involved, but the serious Hesitation is to the number of 
sections. This linit depends upon the nunber of days a 
course is taught during a week period. For example a 
course taught 3 days a week will occupy less space than 

PROGRAMMING SYSTEMS - Symbolic language. 

MINIMUM SYSTEM REQUIREMENTS - Requires a 1620-22 System 
with a 20K memory. Extra features required are tnf, tss 
and Indirect Addressing. IBM 407 or a similar machine 
having at least 72 alphameric type wheels/bars. 

EASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620103040 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



KNIC = KEYWORD IN CONTEXT 



AUTHOR: 



Gold 



DIRECT TECHNICAL INQUIRIES TO: 
M. M. Gold 

Massachusetts Institute of Technology 
Alfred Sloan School of Management 
50 Memorial Drive 
Cambridge, Massachusetts 02139 

DESCRIPTION - This program reads in title cards with an 
ID code either beginning in column 1 or ending in column 
80. If necessary, it moves the ID code to end in column 
80 and then rotates the title image until a word begins 
in colunn 40. It compares this word with stored "non-key" 
words and punches a card with each "key-word" as the leading 
word in the title. Included on the right-hand side will 
be the ID code of any length specified. The output format 
is such that the user may specify the "key-words" begin 
either in column 1 or column 41 (with columns 39 and 40 
blank) . No lateration of the input cards is necessary. 
The user can use the key words supplied with the program 
or may use his own. 

PROGRAMMING SYSTEMS - Britten in SPS. 

MINIMUM SYSTEM BEQUIREMENTS - IBM 1620, Indirect Addressing, 
card I/O, 8207 digits. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620103041 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Forn. 



CONTINUED FROM PRIOR COLUMN 

MINIMUM SYSTEM REQUIREMENTS - This program requires a 1620- 
22 System with a 20K memory. Extra features required are 
THE, THS and Indirect Addressing* IBM 407 or a similar 
machine having at least 72 alphameric type wheels/bars. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - Hone. 

ORDERING INFORMATION: PROGRAM NUMBER 1620103043 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10.3,044 *M 

FINAL EXAMINATION SCHED ULING SYSTEM 20K 

ADTBOR: J. Lincoln Barr 

DIRECT TECHNICAL INQUIRIES TO: 
S. Broder 

Manager of Computer Center 
State University of New York 
Stony Brook, New York 

DESCRIPTION - This system will produce final examination 
schedules with minimized conflicts. The nunber of courses 
which can be scheduled is 119. The system will process 
up to 7 courses per student, ignoring all courses which 
follow the seventh. There is also a maximum limit of 30 
examination periods. However, there is no limit to the 
number of students, nor are there restrictions to division 
of the 30 examination periods into periods per week or 
per day. 

PROGRAMMING SYSTEMS - The condenser program and the conflict 
matrix generator program are written in 1620 Symbolic 
Programming System the scheduling program and the checking 
program are written in PDQ FORTRAN. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 Data Processing 
System with 20K memory with Automatic Division and Indirect 
Addressing features. The IBM 1622 card Reader and Punch, 
a line Printer (IBM 407) and a sorter are required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - 4 Decks containing sample problem 
data. 1 SPS object code (condenser) . 1 SPS object 
code (Conflict Matrix Program). 1 PDQ FORTRAN source 
code (Scheduling Program). 1 PDQ FORTRAN source code 
(Checking Program). 1 PDQ FORTBAN Processor C(2). 1 
PDQ FOBTRAN Subroutines Fixed Format. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 

MACHINE READABLE - Deck 1 - 20K Condenser Program (SPS 
source code). Deck 2 - 20K Conflict Matrix Program 
(SPS source code) . 

ORDERING INFORMATION: PROGRAM NUMBER 1620103044 



PBOGBAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
DTR* 



USER VOLUME 
REQUIREMENT 



none 
none 



1620-10^^043 

WEEKLY SCHEDULING USING MASTER SCHEDULE 

AUTHOR: M. c. Trivedi 

DIRECT TECHNICAL INQUIRIES TC: 
M. c. Trivedi 
Assistant Professor 
Director of Computer Center 
State University of New York 
Agricultural fi Technical Institute 
Alfred, New York 

DESCRIPTION - The main purpose of the program week is to 
prepare a weekly schedule for a student using a pre-prepared 
master schedule and for student requests specifying each 
section of the course. Eesides the principle use, the 
program week nay be used to check conflicts. It may be 
used for a maximum of any six days of a week. The day 
left must be uniform (same) for the institution. A class 
day may be started at any time of the day and may be 
continued for as many as nine consecutive hours with an 
increment of one hour. E.g. start at 8 a.m. and end at 
5 p.m., i.e. the last class is from 4 p.m. to 5 p.m. 

The program WEEK accepts student's reguests as punched 
en a student request card, forms the weekly schedule, 
indicates various types of errors, if any, and then works 
as directed by the sense switches settings. There is no 
limit to the number of students involved, but the serious 
limitation is to the number of sections. This limit depends 
upon the number of days a course is taught during a week 
period. For example, a course taught 3 days a week will 
cccupy less space than a course taught 4 days a week. 
(To know about what number of sections should be loaded, 
please refer to the types of errors.) 

PROGRAMMING SYSTEMS - Written in Symbolic language. 



1620-10.3.045 

FINAL EXAMINATION. SCHEDULING SYSTEM 40K 



AUTHOR: 



J. L. Barr 



DIRECT TECHNICAL INQUIRIES TO: 
S. Broder 

Manager of Computer Center 
State University of Hew York 
Stony Brook, New York 

DESCRIPTION - This system will produce final examination 
schedules with minimized conflicts. 

The number of courses which can be scheduled is 182. 

The system will process up to 7 courses per student, 
ignoring all courses which follow the seventh. There is 
also a maximum linit of 30 examination periods. However, 
there is no limit to the number of students, nor are there 
restrictions to division of the 30 examination periods 
into periods per week or per day. 

PROGRAMMING SYSTEMS - The condenser program and the conflict 
matrix generator program are written in 1620 Symbolic 
Programming System the scheduling program and the checking 
program are written in FORTRAN II. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 Data Processing 
System with 40K, memory with Automatic Division and Indirect 
Addressing features. The IBM 1622 Card Reader and Punch, 
a line Printer (IBM 407), and a sorter are required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - 4 programs containing sample problem 
data. 1-40-60K Condenser Program (SPS object code) . 



COSTBIBOTED PEOGRAflS 



CONTINUED FBOH PBIOB PAGE 

1-10K conflict Batrii Program (SPS object code). 
1-U0-60K Scheduling Program (FOBTEAN II source code) . 
1-U0-60K Checking Program (FOBTEAN II source code). 

OPTIONAL PBOGESB PACKAGE 
DOCuBEHTATIOH - Hone. 

HACHINE EEADABLI - 40K Condenser Program (SPS source 
code) . O0-60K Conflict Batrix Program (SPS source 
code) . 



OPDERIBG 


IBFOBBATION: PBOGBAB NUMBER 11 


12010304! 






PBOGBAH NOBBEB 


DISTBIBOTION 


BEDIOB 


OSES VOLOBE 




EXTENSION 


TIPS 




CODE 


EEQUIBEHINT 


BASIC 


none 


CABDS 




15 


none 


OPTIONAL 


none 


CABDS 




15 


none 


1620-10. 3. 0t6 












FINAL EXAMNATION SCDEDOIIHG SISTEB 


60S 






AUTHOB: 


J. L. Barr 











DIRECT TECHNICAL INQUIRIES TO: 
S. Broder 

Manager of Computer center 
State University of Hew York 
Stony Brook, Mew York 

DESCRIPTION - This system will produce final examination 

schedules with minimized conflicts. 

The number of courses which can be scheduled is 228. The 
system will process up to 7 courses per student, ignoring 
all courses which follow the seventh. There is also a 
mixiamm limit of 30 examination periods. However, there 
is no limit to the number of students, nor are there 
restrictions to division of the 30 examination periods 
into periods per week or per day. 

PROGRAMMING SYSTEMS - The condenser program and the conflict 
matrix generator program are written in 1620 Symbolic 
Programming system the scheduling program and the checking 
program are written in FOBTBAN II. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 Data Processing 
System with 60K memory with Automatic Division and Indirect 
Addressing features. The IBM 1622 Card Header and Punch, 
a line Printer (IBM 407) and a sorter are required. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PHOGEAM NUMBER 1620103046 



CONTINUED FROM PRIOR COLUMN 

Engineering Computer Applications Group 
Baltimore Gas and Electric Company 
Lexington Building 
Baltimore 3, Maryland 

DESCRIPTION - PHODCOH provides a systematic method of 
describing and classifying programs available in the user 
company library. PRODCOM generates a card deck for use 
in preparing and Edison Electric Institute (III) task force 
on computer applications program manual and a user program 
library manual, which is updated when new programs become 
productive. The program permits updating the user program 
library manual without regenerating the entire manual but 
only the affected pages. The input is composed of a minimum 
of 3 cards per program (2 data cards, 1 description card) . 
since PRODCOM limits the number of description cards to 
5, 7 cards per program is the maximum permissible. A 
message stating that the 5th description card did not have 
an asterisk in column 80 will otherwise result, but the 
program will continue to run until a card order error is 
detected. At this point the program will step to permit 
ordering and limiting of input cards. PRODCOM A produces 
user number prefix interpretations. PROCOH E produces 
page title code interpretations. Output from both programs 
supplements the user program library manual. PRODCOM is 
submitted as a suggestion to companies interested in 
constructing a systematic library for themselves, storage 
used 15285 positions. 

PROGRAMMING SYSTEMS - Written in 1620/1710 SPS. 

MINIMUM SYSTEM REQUIREMENTS - 1620 card system with Auto 
Divide and Indirect Addressing. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAH NUMBER 1620103049 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10.3.0 



LUNCH STUDY EXPLODER AND STUDE NT SCHEDULING HANDBOOK 



AUTHORS: H. 8. Tuck 



Freehafer 



Indicate "B l 
in columns 4- 



1" in columns 1-3 and the Program Number 
13 on the IBM Program Order Form. 



1620-10.3.047 

i22P LOCATOR FOR CRITICAL PATH SYSTEM NETWORK 



AUTHOR: 



C. Walker 



DIRECT TECHNICAL INQUIRIES TO: 
D. C. walker 
Computer services Dept. 
Dravo Corporation 
Pittsburgh, Pennsylvania 

DESCRIPTION - The purpose of the program is to diagnose 
"loops" and all unconnected points within a critical path 
network. Properties of a precedence matrix are utilized. 
The I node numbers represent rows and the J numbers 
represent columns. If any matrix row is all zeroes, the 
corresponding column of the matrix can be eliminated, and 
vice-versa. This procedure is used until the "residual 
matrix" is remaining with all looped numbers. This program 
can handle a maximum of 2500 I-J cards and a maximum I 
or J number of 2500. 

PROGRAMMING SYSTEM - Britten for use with the "MISS LESS", 
Critical Path program. 

MINIMUM SYSTEM REQUIREMENTS - Card with Indirect Addressing 
and 40K. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None.. 

OBDERING INFORMATION: PROGRAM NUHBEB 1620103047 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



DIRECT TECHNICAL INQUIRIES TO: 
H. B. Tuck 
IBM Corporation 
370 B. First Street 
Dayton, Ohio 45402 

DESCRIPTION - This program is utilized in conjunction with 
1620-10.3.017 "Student" to do complete school scheduling 
on a basic 20K card 1620. On an optional basis the program 
will schedule lunch and, or study halls. Two different 
semesters can be scheduled on one run. Exploded output 
for each student includes complete course description, 
room number, meeting times. Output can be listed without 
sorting on 402, 407, etc. to produce students schedule. 
In 20K card 1620 the master schedule can be up to 200 
courses with 400 sections. Running time is approximately 
500 - 1000 students per hour depending on number of courses 
in master schedule and number of lines per students 
schedule. Included is a school administrators handbook 
concerning all phases of 1620 student acheduling using 
1620-10.3.017 "Student" and 1620-10.3.039 "Supplementary 
Programs". 

MINIMUM SYSTEM REQUIREMENTS - A 1620 Card System. 
BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-Up- 

MACHINE READABLE - Condensed Object Code Phase 1, 
condensed object code phase 2, sample problem input, 
output exploded cards. 

OPTIONAL PROGRAM PACKAGE 
DOCUMENTATION - None. 

MACHINE READABLE - SPS source code phase 1, SPS source 
code phase 2. 

OBDEBING INFORMATION: PBOGBAH NUMBEB 1620103050 



PBOGBAH NUMBER 
EXTENSION 



DISTBIBOTION MEDIUM 
TYPE CODE 



USER VOLUME 
REQUIREMENT 



BASIC none 
OPTIONAL none 



1620^10.3^.051 

D ISKH IC - 



AUTHOR: 



A KHIC INDEXES FOR DISK AND PSINTEB 

B. B. Thomas 



1E0GBAK CATALOG FOR DIGITAL COMPUTERS - EROCOM 



B. E. Nelson 



DIRECT TECHNICAL INQUIRIES TO: 

R. E. Nelson 



DIRECT TECHNICAL INQUIRIES TO: 

B. B. Thomas 

Planning Department 

Federal Reserve Bank of Minneapolis 

Minneapolis, Minnesota 

DESCRIPTION - The program generates permuted index records 
sorts the records en the disk file, and prints the sorted 
index list. Provision is made for a list and count of 



CONTRIBUTED PEOGRAMS 



CONTINUED FBCM PBIOB PAGE 

original (input) records, omitting certain words (up to 
90) , and a count of index entries. Current capacity of 
1200 index entries may be increased according to disk space 
available. 

PBOGBAMMING SYSTEMS - Monitor - Cperates under PH-033 
1620/1311 Monitor Control and uses 1620/1311 Sort/Merge 
(1620-SH-047). 

HINIMUH SYSTEM BEQUIBEMENTS - A 20K disk file system with 
TNS, TNF, HE, Indirect Addressing and a 1443 printer. 
TNF and Indirect Addressing may be reprograamed to allow 
use on a lesser machine. 

BASIC PEOGEAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE EEADABLE - None. 

OBDEBING INFOEMATION: PEOGEAM NUMBEB 1620103051 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



!620 z 10.3 i J52 iS 

ANALYSIS OF FACTOBS AFFE.CT.ING OPTIMUM PLANT SIZE 

AUTHOB: E. M. Babb 

DIEECT TECHNICAL INQUIBIES TO: 
E. H. Babb 
Purdue University 

Department of Agricultural Economics 
Lafayette, Indiana 47907 

DESCRIPTION - This program is a general model used to 
analyze the effects of assembly and distribution factors 
and economics of scale in processing on optimum (least- 
cost) size of plant and on total cost and its components 
for plants of various sizes. The program can accommodate 
the analysis of a plant processing from one to three 
products, but can be modified to handle additional products. 
The program is analytical but is written so that solutions 
can be observed where variables affecting optimum size 
of plant take on a range of values. This allows the 
researcher to test the sensitivity of solutions and observe, 
for example, how costs are affected by changes in sales 
density. 

PBOGBAMMING SYSTEMS - Written in FOBTBAN II. 

MINIMUM SYSTEM BEQUIBEMENTS - 24K, 1620 Model I, Floating 
Point, Auto Divide, TBS, TNF, MF, and card read/punch. 



CONTINUED FBOM PBIOB COLUMN 

DESCBIPTIOH - This program is a Post-Processor which is 
used to convert the output data generated by AUTOSPOT II 
(1620-CN-05X) into instructions for the Burgmaster Drill 
Press. Storage used by program- Less than 20K. 

PBOGBAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Card system. Auto Divide, 
Indirect Addressing, TNF, and BF executed by subroutine 
in the object deck. 

BASIC PBOGBAM PACKAGE 

DOCDMENTATION - Write-up on Microfiche only. 
MACHINE EEADABLE - None. 

OBDEBING IHFOEMATION: PEOGEAM NUMBEB 1620104011 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form- 



1620-10.4.013 

POST PEOCESSOE FOE LE BLOND TAPE-TORN LATHE JITH MAM 
CENTO BY NOMEEICAL CONTOURING WITH "^E*! FORMAT 



AOTHOB: M. M. Thompson 

DIBECT TECHNICAL INQUIRIES TO: 
H. H. Thompson 
Goodyear Aerospace Corp. 
1210 Hassilon Bd. 
Akron, Ohio 

DESCRIPTION - This program is a Post-Processor which is 
used to convert the output data generated by AOTOMAP I 
(1620-CN-01X) into instructions for the Leblond Tape-turn 
Lathe. 

PEOGBAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM BEQOIBEMENTS - A 20K 1620 card system with 
Auto Divide and Indirect Addressing. TNF and MF are 
executed by subroutine in the object deck. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBING INFOBHATION: PBOGBAM NOMBEB 1620104013 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BBADABLE - None. 

OBDEBING INFORMATION: PBOGBAM NUMEEE 1620103052 

Indicate "E N 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBM Program Order Form. 



162031 0.4^010 

AUTOSPOT II POST-PROCESSOa FOR CISTIMATIC TURRET DRILL 
WITH STEPPING SWITCH CONTROL 



1620-11.0.004 

1M .EXECUTIVE GAME 

AUTHOBS: E. Jury 



Lee 



AUTHORS: R. Beller 



Hall 



DIEECT TECHNICAL INQOIRIES TO: 
E. Beller 

Cincinnati Milling Machine Co. 
Cimtrol Division 
Marburg Ave. 
Cincinnati 9, Ohio 

DESCBIPTION - The post-processor is a single pass card 
input/card output routine which accepts general autospot 
record-type output and converts it to information meaningful 
to the cintimatic Turret Drill. 

PBOGBAMMING SYSTEMS - Written in SPS language. 

MINIMUM SYSTEM REQUIREMENTS - 1620 20K 1622 Card Bead-Punch 
Unit, Indirect Adressing and Automatic Divide hardware. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBING INFCEMATION: PBOGBAM NOMBEB 1620104010 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-10,4.011 

POST PROCESSOR CONCEPTS FOR THE BURGMASTER DRILL PRESS 
WITH HUGJS NC^iH MACHINE TOOL CONTROL 



DIRECT TECHNICAL INQUIRIES TO: 

J. Lee 

Commonwealth of Massachusetts 
Oniversity of Massachusetts 
Amherst, Mass. 

DESCBIPTION - To familiarize business students with the 
processes of business decisions and the resulting effects 
on the market. This program is a translation of the 
U.C.L.A. game for the IBM 650. 

MINIMUM SYSTEM BEQUIBEMENTS - Memory 20K. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Object code appendix tape 

OPTIONAL PBOGBAM PACKAGE - None. 

OBDEBING INFORMATION: PEOGEAM NOMBEB 1620110004 



PBOGBAM NUMBEB 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



PT 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620-11. 0.005 

BLACKJACK GAME 



AUTHOR: 



A. J. Lang 



AUTHOR: M. a. Thompson 

DIRECT TECHNICAL INQUIBIES TO*. 
M. M. Thompson 
Goodyear Aerospace Corp. 
1210 Massilon Bd. 
Akron, Ohio 



DIBECT TECHNICAL INQUIRIES TO: 
A. J. Lang 

Fairchild Camera 8 Instrument Corp. 
Dumont Military Electronics Corp. 
Defense Products Division 
750 Eloomfield Avenue 
Clifton, New Jersey 

DESCBIPTION - The program to play the game of blackjack 
(commonly known as "21") was designed for demonstration 
purposes for the 1620 Data Processing System. Storage 
6607 core positions. 



MINIMUM SYSTEM REQUIREMENTS 



1620 with attached 1621. 



CONTRIBUTED FBOGRABS 
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EASIC FBCGEAH PACKAGE 

DOCUBENTATION - Brite-up on Hicrofiche only. 
HACBIHE READABLE - None. 

OBDBBIBG IBFOEHATIOH: PBOGBAB BUHBEB 1620110005 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620-11. 0.012 

TIC-IAC-TOE DJHONSTBATION 



AOTHOB: 



H. O.Holoien 



DIBECT TECBNICAL INQUIBIES TO: 
H. 0. Holoien 
Math Department 
Borth Dakota state University 
Fargo, North Dakota 

DESCRIPTION - Since the version of FORTRSN used has the 
Format statement, that version of the subroutine deck 
must also be used. The object program uses locations 830 
16832. No relocatable subroutines are used. 

PBOGEABHING STSTEB - Britten in FOBTBAN 

BINIHUH SYSTEH BEQUIREBEBTS - Card system, memory 20K 

EASIC FfiOGBAH PACKAGE 

DOCDBENTATIOB - Brite-up. 

SACHINE READABLE - Cards. 

0PTI0BA1 PBOGBAB PACKAGE - None. 

OBDFBIBG INFOBBATION: PBOGBAB NOBBER 1628110012 



BASIC 

OPTICNAI 



PROGBAB NUHBEB 
EXTENSION 



none 
none 



DISTRIBUTION HEDIOH 
TYPE CODE 



DTB* 
none 



USER VOLUBE 
BEQUIBEBENT 



none 
none 



1620-11.0.013 

TIC TAC TOE 



AOTHOB: 



: J LEARNING PROGBAB 
D. Glauz 



DIRECT TECHNICAL INQUIRIES TO: 
W. D. Glauz 

School of Aeronautical 8 Engineering Sciences 
Purdue University 
Lafayette, Indiana 

DESCRIPTION - This is a demonstration program with which 
one nay Flay Tic Tac Toe against the machine. However 
the machine, being guite stupid, can be beaten. It "learns" 
from its defeats and cannot te beaten twice in the same 
identical way. 

BINIHUH STSTEH REQOIBBHENTS - Bemory 20K, 1622 Card Reader 
and Punch (may be modified for paper tape) , with Indirect 
Addressing. 

BASIC PBOGBAH PACKAGE 

DOCUBENTATION - Brite-up. 
BACBINE READABLE - Cards. 

OPTIONAL EROGRAH PACKAGE - None. 

CRDERING INFCBHATION: PBOGBAB NDHBEE 1620110013 



PBOGRAH NUHBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION BEDIUH 
TYPE CODE 



DTR* 
none 



USER VOLUBE 
BE.QUIBEHENT 



none 
none 



1620 
CONTINUED FBOH PRIOR COLUHN 
subroutines. 

OPTIONAL PBOGRAH PACKAGE - Bone. 

ORDERING INFOBBATION: PROGBAB NUHBER 1620110018 



PROGBAH NUHBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION HEDIOH 
TYPE CODE 



DTR* 

none 



USER VOLUHE 
EEQUIBEBENT 



none 
none 



lfi20 = 11.0.0J8 

BORTGAGE ABORTIZATIO 



AUTHOB: 



PBOGBAB 
G. Sanders 



DIBECT TECHNICAL INOOIBIES TO: 
L. G. Sanders 
Hathematics Department 
Digital Computer Laboratory 
AF Institute of Technology 
Bright-Patterson AFB, Ohio 

DESCRIPTION - This program is concerned with a debt which 
is to be repaid, with interest, by a number of egual monthly 
payments. As the debt is repaid, the proportion of each 
monthly payment devoted to interest decreases, while that 
devoted to debt reduction increases. 

BINIHOH SYSTEH EEQUIBEHENTS - 16,721 digit spaces. IEH 
1620, with 20K and card input and output. 

BASIC PROGBAB PACKAGE 

DOCUHENTATION - Brite-up. 

HACHINE READABLE - Source code, loader, object code. 



1620-11.0. 0ig *j 

HIH ANiThEB 

AUTHOB: A. Colijn 

DIEECT TECBBICAL INQUIRIES TO: 
A. Colijn 

University of Alberta 
Computing Centre 
Calgary, Alberta, Canada 

DESCBIPTIOB - The program is intended as demonstration 
of a simple form of learning by a computer. The computer 
plays a game, HEXAPABN, knowing at first only the rules 
of the game, learning the best strategy through experience. 

BINIHUH SYSTEH EEQUIBEHENTS - IBB 1620 computer with 20K 
core storage. Automatic Divide, and Indirect Addressing. 
No other special features required. 

BASIC PBOGBAH PACKAGE 

DOCUHENTATION - Brite-up on Bicrofiche only. 
HACBINE BEADABLE - None. 

OBDEBING INFORHATION: PEOGBAH NUHBER 1620110019 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 1-13 on the IBB Program Order Form. 



1620-11.0. 020 

REACTION TIHE PBOGRAH 



AUTHOB: 



L. Pratt 



DIBECT TECHNICAL INQUIRIES TO: 
B. L. Pratt 

Senior Computer Programmer 
Data Corporation 
7500 Old Xenia Pike 
Dayton, Ohio 151132 

DESCRIPTION - This is a demonstration program which measures 
the reaction time of a person. 

PBOGHAHBING SYSTEHS - Britten in SPS language. 



BIHIBUB SYSTEH REQUIREHENTS - IBB 1620, with 20,0 

of memory, card input-output. 



digits 



BASIC PROGBAB PACKAGE 

DOCUHENTATION - Brite-up. 

HACHINE READABLE - Reaction time source code, reaction 
time object code. 

OPTIONAL PROGBAH PACKAGE - None. 

OBDEBING INFOBBATION: PBOGBAB NUHBEB 1620110020 



PBOGBAH NUHEEB 
EXTENSION 



BASIC 
OPTIONAL 



none 
none 



DISTEIBUTION HEDIUB 
TYPE CODE 



DTB* 
none 



USEE VOLUBE 
BEQUIBEBENT 



none 
none 



1620-11.0.021 

QUEENS GAflE iBODIFIEDl 



AOTHOB: 



Boon 



DIEECT TECBNICAL INCUIBIES TO: 
B. A. H. Boon 
University of Canterbury 
Box 1171 
christchurch. New Zealand 

DESCBIPTION - This program permits the 1620 and another 
player (human) to play a simple game on a draughts board. 
It is a modified form of a game used as a 7070 
demonstration. It is just difficult to provide a good 
game for the novice confronting the machine with awe. 

PBOGEABHING SYSTEH - Britten in SPS I. 

HINIBUB SYSTEH BEQUIEEHENTS - Basic card 1620. 

BASIC PEOGRAH PACKAGE 

DOCUBENTATION - Brite-up on Bicrofiche only. 

HACHINE BEADABLE - None. 
ORDERING INFORHATION: PBOGBAB NUHBEB 1620110021 



CONTRIBUTED PBOGBAMS 
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Indicate n E N 1" in columns 1-3 ana the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-11. 0.022 

PEBPETUAL CA1ENDAJ 



*a 



AUTHOR: 



B. Earl 



DIRECT TECHNICAL INQUIRIES TO: 

S- B. Earl 

University of Canterbury 
P. 0. Box 11*71 
Christchurch, Hew Zealand 

DESCRIPTION - This program gives the day of the week for 
any date (A.D.) in the Gregorian calendar, entered 
numerically at the typewriter keyboard in logical sequence 
(viz- Say, month; year). Appropriate messages are typed 
oat for invalid entries (e.g. 31.11.1962). It is an 
excellent demonstration program for non-specialists, most 
of whom know what a calendar is. 

PROGRAMMING SYSTEMS - Britten in SPS I. 

MINIMUM SYSTEM BEQUIBEMENTS - Basic 20K card 1620 with 
Divide Hardware. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110022 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-1 1,0,026 

UNIVERS AL CALENDAR 

ADTHOB: Bonald C. Bead 

DIRECT TECHNICAL INQUIRIES TO: 
Bonald C. Bead 
Department of Mathematics 
University of the Rest Indies 
Kingston 7, Jamaica, Nest Indies 

DESCBIPTION - This program gives the day of the week 
corresponding to any given date between the years 1 A.D- 
and 9999 A.D. Its purpose is to demonstrate the speed 
and ability of the IBM 1620 by means of a problem whose 
nature and complexity is apparent to the non-mathematician. 
Numbers depending on the days, month, year, century, number 
of leap years since the beginning of the century, and so 
on are calculated and added. Their sum is reduced Modulo 
7, and the result is converted to a day of the week. The 
program should be compatible with any special features, 
and any size of memory. 

PBOGBAKMING SYSTEMS - Written in machine language 

MINIMUM SYSTEM REQUIREMENTS - Basic tape 1620 - no special 
features. 

BASIC PBOGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

OBDEBING ISFOBMATION: PROGRAM NUMBEB 1620110026 

Indicate "B N 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-11.0.824 *M 

ACCOUNTING DEMONSTRATION PROGRAM - ADP 

AUTHOB: Arthur H. Pike 

DIBECT TECHNICAL INQUIBIES TO: 
Arthur H. Pike 
Associate professor 
Dept. of Economics and 
Business Administration 
Norwich University 
Northfield, Vermont 

DESCBIPTION - This program may be used to simulate the 
accounting process usually taught in acccunting theory 
classes. The portion of the accounting cycle including 
the preparation of five journals of original entry and 
a trial balance is demonstrated. Certain error detection 
and audit principles are also demonstrated. The data input 
code has been found usable at the college sophomore level. 

PBOGBAMMING SYSTEMS - 1620 Machine language. 

MINIMUM SYSTEM BEQUIBEMENTS - 1620 with 20K storage, paper 
tape I/O. No special features required. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 

MACHINE BEADABLE - None. 

OBDEBING INPOBMATION: PBOGBAH NUMBER 1620110024 

indicate W B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Progran Order Form. 



1620^11^.0^025 

GAME OF DICE 



1620^15.0^029 

DEHOPAK - A FUNCTIONAL DEMONS TRAT ION OF THE IEJ .1620 



AUTHOR: 



Bobert H. Fahnestock 



DIBECT TECHNICAL INQUIRIES TO: 
Robert H. Fahnestock 
Centralia College 
2615 Howard Street 
Centralia, Washington 

DESCRIPTION - This is an entertainment type progran that 
simulates a crap game using two dice. 4303 positions of 
core including the add tables. Memory 20K. 

PBOGBAMMING SYSTEMS - SPS. 

MINIMUM SYSTEM REQUIREMENTS - 20K card system 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 

MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110025 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHORS,: Bay Peck 

W. J. Olmo 



Dave Montgomery 



DIRECT TECHNICAL INQUIRIES TO: 
H. J. Clmo 
IBM Corporation 
340 Market Street 
San Francisco, California 

DESCRIPTION - DEMOPAK is designed to be used as an 
introductory demonstration of various 1620 functions and 
to provide a background for the demonstration of programming 
systems and production programs. The program is divided 
into sections, each of which is a complete program which 
will type a heading and, if program switch 3 is on, a set 
of operating instructions. The section then comes to a 
halt and is executed by depressing start. Upon completion 
the program returns to the initial halt and is ready to 
be executed again. Program switches 1 and 2 are used in 
some sections to stop the operations, alter logic, or 
provide optional input or output. Bhen the demonstration 
of any section is complete the operator depresses reset, 
insert, release and start to proceed to the next 
demonstration section. By inserting the correct branch 
the operator can return to any section or change the 
sequence of section. 

PROGRAMMING SYSTEMS - Is written in 1620/1710 SPS (1620- 
SP-020) 

MINIMUM SYSTEM REQUIREMENTS - Basic 1620 card system, no 
special features. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Brite-up. 

MACHINE BEADABLE - Appropriate material delivered. 

OPTIONAL PBOGBAM PACKAGE 
DOCUMENTATION - None. 
MACHINE BEADABLE - Source code. 



ORDERING INFORMATION: PROGRAM NUMBER 1620110029 



PROGRAM NUMBER 
EXTENSION 



OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTB* 
DTF* 



USER VOLUME 
BEQUIBEMENT 



none 
none 



1620-11. 0.03 

ilEIJCT NUMBER DEMONSTBATION PBOGBAM 



AUTHOR: 



Sawyer, Jr. 



DIRECT TECHNICAL INQUIRIES TO: 

J. H. Sawyer, Jr. 

116 Belle Vista Court, N. B. 

Winston-Salem, N. C. 27106 

DESCBIPTION - Perfect numbers, by definition, are equal 
to the sum of their proper devisors. For example, 6 is 
a perfect number, since 6 equals 1S263. Until 1952, only 
12 of these numbers were known. After this time computers 
were used to determine additional perfect numbers. This 
program types a brief history of perfect numbers, gives 



CONTRIBUTED PROGRAMS 
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a summary of the method used to determine them, and computes 
rapidly the first five perfect numbers. 

PROGRAMMING SYSTEMS - Is written in FOBTBAH with Format, 
and the object deck is compiled with UTO FOBTBAN. 



BINIBDB SYSTEB REQUIREMENTS 

Punch. 



20K memory, 1622 Card Bead- 



BASIC PBOGBAB PACKAGE 

DOCUMENTATION - Brite-up. 

BACHIME READABLE - Appropriate material delivered. 

OPTIONAL PBOGBAH PACKAGE - None. 

ORDERING INFOBMATION: PROGRAM BOBBED 1620110038 



BASIC 
OPIICNAL 



PBOGBAB NUBBEB 
EXTENSION 



none 
none 



DISTRIBUTION BEDIOfl 
TYPE CODE 



DTB» 
none 



USER VOLUBE 
REQUIREMENT 



none 
none 



1620-11.0.031 

BUSIC FROGRAB 



AUTHOR: 



Laura B. Steele 



DIRECT TECHNICAL INQUIBIES TO: 
Laura Bl Steele 
General Motors Institute 
Flint, Michigan 

DESCRIPTION - Demonstration program to play music on the 
1620 using a radio speaker for output. Uses a tune 
subroutine plus constants specifying address of field for 
each note and duration of a note, storage used by program- 
actual subroutine and constants located from 19500-19999. 
Each tune takes varying storage according to number of 
notes to be played. 

PROGRAMMING SYSTEMS - Britten in SES 1620/1710. 

BINIBOB SYSTEB BEQUIREBENTS - Card system, (Model I) , 
Indirect Addressing, can be used on any machine by changing 
the one instruction which uses Indirect Addressing. Could 
be compiled on tape as well as cards. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 
OPTIONAL PROGBAM PACKAGE - None. 
OBDEBING INFOBMATION: PROGRAM NUMBER 1620110031 



EASIC 

OPTIONAL 



PROGRAM NUBBER 
EXTENSION 



none 
none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTE» 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620-11.8.032 

EBC EASEBAIL SIMULATION -— DEBCNSTBATOR 



AUTHOR: 



P. 



Burgeson 



DIRECT TECHNICAL INQUIRIES TO: 
P. R. Burgeson 
4257 Oak Knoll Avenue 
Youngstown 12, Ohio 

DESCRIPTION - This program demonstrates the simulation 
ability of the 1620 by- guote - playing - unguote - the 
game of baseball between two all star teams. The machine 
operator picks the visiting team from a master roster of 
90 possible players, the 1620 selects (randomly) the home 
team from the 81 players left. A complete ball game is 
then simulated. Two separate random number generators 
which are initialized at the program start assure a 
different game each time, simulation of the rules of 
baseball. Bestrictions- the program recognizes only 90 
particular player names and records, contained in a master 
table with the program. Other player names are not 
acceptable. 

PROGRAMMING SYSTEMS - Coded in machine language. 

MINIMUM SYSTEM REQUIREMENTS - Basic 20K 1620 with 1622 
Card Beader. No other features are used, although their 
presence dees not inhibit program operation. Storage- 
all of 20K memory is used. 

EASIC EBCGBAB PACKAGE 

DOCUMENTATION - Brite-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

OBDEBING INFOBMATION: PBOGBAB NUBBER 1620110032 



ERCGBAM NOBBER 
EXTENSION 



DISTRIBUTION BEDIUB 
TYPE CODE 



USER VOLUBE 
BEQUIREHENT 



CONTINUED FBOB PBIOB COLUMN 

BASIC none DTB* 

OPTIONAL none none 



none 
none 



16 20-11.0 .033 

BUSICAL OUTPUT PROGRAB 



AUTHOR: 



Ron Davis 



DIRECT TECHNICAL INQUIRIES TO: 
Mr. A. Heyworth 

Department of computer Science 
University of Alberta 
Edmonton, Alberta, Canada 

DESCBIPTION - This program causes the computer to output 
music through a nearby radio tuned to the clock freguency 
of 1 Megacycle or its harmonics. 

PBOGBAMMING SYSTEMS - Fast, an SPS type assembler. 

BINIBUM SYSTEM BEQUIREBENTS - Card system. Indirect 

Addressing, A. B. radio receiver, program can be used 

on lesser machine. Decks for 20K, 40K, 55K, are included. 

BASIC EROGBAB PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAB NUBBER 1620110033 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



I62jfcjl.0_.03i! 

MUSICAL ASSEBBLY PBOGBAB 

AUTHOR: R. Davis 

DIRECT TECHNICAL INQUIRIES TO: 
A. Heyworth 

Department of computing Science 
University of Alberta 
Edmonton, Alberta, Canada 

DESCRIPTION - This program translates cards punched in 
musical notation into cards of the correct format for the 
musical output program. Storage used by prcgram - 00402 
to 03235. 



prograhbing systems - Language used 
assembler. 



FAST, an SPS type 



MINIMUM SYSTEM REQUIREMENTS - Card system. Indirect 
Addressing, TNS, TNF. Can be used on lesser machine. 
Can be assembled on a 20K, 40K, and 55K computer. 

BASIC PBOGRAH PACKAGE 

DOCUMENTATION - »rite-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110034 

Indicate "B N 1 M in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program order Form. 



i620rl1.ili0.36 

EXECUTIVE GAME 



AUTHOR: 



J. A. 



Lee 



DIRECT TECHNICAL INQUIRIES TO: 
J. A. s. Lee 

Commonwealth of Massachusetts 
University of flassachusetts 
Amherst, Bassachusetts 

DESCRIETION - This game simulates market reactions as a 
function of player decisions over a guarter year in a 
single product, single area industry with a maximum of 
8 separate firms (or teams) . The purpose of this game 
is to install some notions of the endeavors of ("executive 
management") into the minds of business students and those 
aspiring to this type of work. Storage reguirements - 
20K. 

PROGRAMMING SYSTEMS - Britten in SPS. 

mibibub SYSTEM EEQUIREMENTS - Memory 20K, Automatic Divide, 
Indirect Addressing, other special features required - 



Codes 71, 72, 73. 
1620-11.0.004. 



This program is the card version of 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORBATICN: PROGRAM NUBBER 1620110036 



PROGRAB NUMBER 
EXTENSION 



DISTEIBUTION BEDIUB 
TYPE CODE 



USER VOLUME 
BEQUIREBENT 



CONTRIBUTED PROGRAMS 



CONTINUED FEOH PFIOB PAGE 



BASIC none 

OPTIONAL none 



DTR* 
none 



none 
none 



1620-11.13.037 

EA5EBALL GAME PEOGEAM 

AUTHOR: D. R. Iverson 

DIBECT TECHNICAL INQUIRIES TO: 
D. B. Iverson 
21503 Craig Court 
Torrance, California 



90502 



DESCEIETIC8 - This SPS program permits the operator to 
play najor league baseball on the IBM 1620 computer. It 
is primarily intended to be executed by two persons, since 
the operator calls the strategy he desires and a manager 
is needed for each team (conceivably, though, one person 
could manage both teams) . The operator informs the computer 
of his desired strategy by throwing one or a combination 
of the four console switches. The program is based on 
actual major league statistics, apd the operator has the 
option of what teams he wants to play based on a specified 
years performance. This characteristic is accomplished 
by reading in data cards for the desired players when the 
program is loaded into the computer'. The operator must, 
therefore, prepare data cards for the players he wants 
to use. As an aid in the preparation of these data cards, 
two F0HT8AN programs have also been written in conjunction 
with the main baseball program. 

PROGRAMMING SYSTEMS - Written in SPS. 

MINIMUM SYSTEM REQUIREMENTS - The 1622 Card Reader and 
1620 computer with no extra features and minimum storage 
are required fcr the program. 

BASIC PEOGEAM PACKAGE 

DOCUMENTATION - Hrite-Up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PEOGEAM PACKAGE 
DOCUMENTATION - None. 
MACHINE READABLE - Source Code. 

OEDEBING INFORMATION: PEOGEAM NUMBER 1620110037 



CONTINUED FROM P8I0R COLUMN 

music and plays the music through a standard AM radio 
placed on the computer. The input notes are interpreted 
as loops of various lengths, to be performed a various 
number of tines. The interpreter will handle any note 
fron G-sharp-sub-zero to C-sub-six. However, the lowest 
octave and a half is of very poor tonal quality. Provision 
is made for any reasonable tempo. A rest is interpreted 
as a very low note. The interpreter will handle a maximum 
of 2277 notes and rests in any one song, on a 20K machine. 
Storage used by program - locations 00000-00400, 18622- 
19999, and 8 additional locations per note of song. 

PROGRAMMING SYSTEMS - SPS - 1620/1710, Mainline, complete. 
Interpreter may be partially relocated by recompiling the 
SPS source deck. Since the actual physical characteristics 
of the machine influence the success of the program, it 
may not give satisfactory results on all machines. 

MINIMUM SYSTEM REQUIREMENTS - Card I/O, TNS, TNI, HP, Auto 
Divide, Indirect Addressing, also, must be Model 1. 
Requirements which can be easily removed - Card I/O, TNS, 
TNF, MF, Auto Divide, also, can be modified for Model 2. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 
MACHINE READABLE - Bone. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110039 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-11.0.0 



PEOGEAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USEE VOLUME 
REQUIREMENT 



OPTIONAL none 



1620^11-0^0.38 

ELEMENTARY NUMBER THEORY DEMONSTRATION 



AOTHOB: 



B. Nelsen 



DIBECT TECHNICAL INQUIRIES TC; 
B. B. Nelsen 
Computer Center 
DePauw University 
Greencastle, Indiana 



46135 



DESCRIPTION - The program is designed to calculate any 
combination of the following three functions for foxed- 
point numbers P and Q. The Euclidean algorithm for the 
greatest common divisor of P and Q, the greatest common 
divisor as a linear function of P and Q, and the table 
of partial convergents for P/Q. 

PROGRAMMING SYSTEMS - FORTRAN with Format. 



DEKONSTRATION PROGRAM TO PRINT OUT PBIME NUMBERS 

AUTHOR: S. T. Harling 

DIBECT TECHNICAL INQUIRIES TO: 
R. T. Harling 

Air Force Institute of Technology 
AFIT-SB-HATH 
Hright-Patterson AF Base, Ohio 

DESCRIPTION - This program utilizes the method published 
in the IBM 1620 Newsletter, Volume II, No. 1, by Dr. Ronald 
C Reed. The object deck is preceded by a two-card ("zero- 
core") routine which was published in the IBM 162 
Newsletter, Volume I, No. 1. Storage used by program - 
40K. 

PROGRAMMING SYSTEMS - SPS - 1620/1710. Mainline, complete. 

MINIMUM SYSTEM REQUIREMENTS - Card system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 16200110040 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colnmns 4-13 on the IBM Program Order Form. 



1620zll*2ifi! *M 

CARD PUNCH DEMONSTRATION PROGRAM TO PUNCH BLOCK LITTERING ON 
IBM~CARDS 

AUTHOR: J. Landau 

DIRECT TECHNICAL INQUIBIES TO: 
J. L. Alford 
Harvey Mudd College 
Engineering Dept. 
Claremont, California 91716 



MINIMUM SYSTEM REQUIBEMENTS - IBM 1620 card system, 20K 

memory. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

OEDEBING INFORMATION: PROGRAM NUMBER 1620110038 

PROGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



BASIC none 
OPTIONAL none 



DTB* 
none 



none 
none 



DESCRIPTION - This demonstration program accepts 
alphanumeric information from the console typewriter and 
reproduces it in the form of block lettering punched on 
the backs of standard IBM cards. Either of two sizes of 
lettering can be selected - (1) 1-inch letters which fit 
ten per line, two lines per card, or (2) 2-inch letters 
which fit ten per card, on one line only. Dp to 75 
different sets of lettering can be requested at one time 
from the typewriter, each of which can have large or small 
letters, centered or not, punched on any number of cards. 
All the cards can be punched at once in six passes through 
the card punch. Characters which can be punched include 
the alphabet, the digits, arithmetic operation symbols, 
and punctuation narks. Storage used by program - 20K. 

PROGRAMMING SYSTEMS - SPS. 

MINIMUM SYSTEM REQUIREMENTS - Card system. Machine language 
- No compiler used. 



1620-11.6.839 

HDSIC INTERPRETER 



AUTHOR: 



F. Smiley 



DIRECT TECHNICAL INQUIBIES TO: 
B. F. Smiley 
Carleton College 
Northfield, Minnesota 55057 

DESCRIPTION - This program reads cards punched from sheet 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL EROGBAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110041 



PROGRAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 
BEQUIREMENT 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 

EASIC none DTR* 

OPTIONAL none none 



none 
none 



1620- 11. 0^.042 

KIM 



AUTHOR: 



Green 



DIRECT TECHNICAL INQUIRIES TO: 
J. Green 

Data Processing Center 
Harvard School of Public Health 
1 Shattuck St. 
Boston , Massachusetts 

DESCRIPTION - This demonstration program pits the computer 
against a human in a game far more interesting than Tic- 
Tac-Toe or Blackjack. 

PROGRAMMING SYSTEMS - Britten in FORTRAN with FORMAT, 
Mainline, complete. 

MINIMUM SYSTEM REQUIREMENTS - Card system (16K) . 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110042 

PROGRAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



CONTINUED FROH PRIOR COLUMN 

data is re-typed with output. Sums number of days using 
dan 1, 1S83 as first day. The program makes special 
corrections for guandrennial and centesimal leap years. 
Converts sum of days to day of week by repeated subtraction 
of seven. Optimized program gives result in from two to 
seven seconds. For use with any 1620 with card I/O. 
Written in UTO FORTRAN (1620-02.0.024). Input dates of 
calendar limited to 1585 AD to 2599 AD. Dates earlier 
than 1585 AD are not meaningful since the Gregorian calendar 
vas invented by Pope Gregory XIII in 1582 and did not come 
into general use until somewhat later. The Julian calendar 
was used prior to this time, but there were so many local 
options regulating its use that the general program for 
it is not suggested. 

PROGRAHMING SYSTEMS - Written in FORTRAN with Format. 



MINIMUM SYSTEM REQUIREMENTS 
capacity. 



Card System with 20K storage 



BASIC none 
OPTIONAL none 



DTR* 
none 



none 
none 



1620- 11.0.043 

EXPENSIVE DESK CALC ULAT OR 



AUTHOR: S. E. Hadnick 



DIRECT TECHNICAL INQUIRIES TO: 

s. E. Hadnick 

Massachusetts institute of Technology 

77 Massachusetts Avenue 

Cambridge, Massachusetts 03139 

DESCRIPTION - The expensive desk calculator program provides 
the 1620 user with a convenient, valuable calculating tool 
that is both versatile and easy to use. It is no longer 
necessary to waste the time involved in writing and 
compiling a FORTRAN program in order to perform simple 
numerical calculations. This program combines the ease 
of a desk calculator with the power of a high speed 
computer. All output occurs via the console typewriter. 

Input is accepted from either cards or typewriter in the 
form of single arithmetic expressions involving the normal 
operations of algebra, namely add, subtract, multiply and 
divide, and including the use of parentheses, and any of 
11 predefined arithmetic functions. Expressions are 
evaluated immediately as they occur. Provisions also exist 
for defining symbols and reiterating a group of expressions. 
A number of simple input/output commands are provided in 
order to make input/output quite flexible. Internal 
accuracy is variable from 2 to 20 places, although, unless 
modified by command, it is standardized at 8 places. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 with 20K memory 
and Indirect Addressing feature. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL EROGRAM PACKAGE - None. 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110044 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



.1620-11.0.045 

DATE INTERPRETER AND PERPETUAL CALENDAR 

AUTHOR: Mr. Jack Landau 

DIRECT TECHNICAL INQUIRIES TO: 
Mr. Jack Landau 
Engineering Department 
Harvey Mudd College 
Claremcnt, Calif. 91716 

DESCRIPTION - Here is an elegant perpetual calendar program 
which has a completely re-form input, whether from cards 
of the console typewriter, and provides the following sort 
of information about any date in any year greater than 
1752 — Thursday 4 July 1776, 27th week 186th day of the 
year. Input can range anywhere from lengthy questions 
in sentence form to the most abbreviated statements - the 
program accepts anything which will allow it to uniguely 
determine one date. Twenty different error checks with 
corresponding informative messages are made on the input 
data to guarantee essentially foolproof operation. When 
you need to demonstrate simultaneously the logical, 
arithmetic, and printing capacities of the 1620, as well 
as its speed, versatility and usefulness, this is the 
program to use. Storage used by program - 8890 positions. 
Equipment required by program - Card system, TNS-TNF-BF, 
Auto Divide, Indirect Addressing, 1620 Model 1. 
Requirements that can be easily removed are TNS-TNF-MF 
and Auto Divide. Programmed in - IBM SPS. There are 
several perpetual calendar programs already in the library. 
This program is greatly superior to each one for one or 
more of the following reasons - completely free-form input, 
input can be from typewriter or cards, twenty error checks 
on input statements, output statement gives complete 
information about the date in guestion, some of the 
Mathematical techniques are explained in the write-up. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110045 

Indicate M B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



16 20^112.0^04 6 
VIRTUOSO 



CBDERING INFORMATION: PROGRAM NUMBER 1620110043 



PEOGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



^620^11-0^044 

GREGORIAN CALENDAR - 1585 to 2599 A.D. 



AUTHOR: 



K. Simpson 



DIRECT TECHNICAL INQUIRIES TO: 
B. K. Simpson 
13134 Deming Avenue 
Downey, California 90242 

DESCRIPTION - This program types the day of the week 
corresponding to a give date in the Gregorian calendar. 
Illegal dates and dates before 1585 AD are excluded. 
Console switch determines card or typewriter input. Input 



THE HUSIC PROGRAM TO END ALL MUSIC PROGRAMS 

AUTHORS: P. J. Jutsum R. C. Read 

DIRECT TECHNICAL INQUIRIES TO: 
P. J. Jutsum 
Computing Centre 
Mathematics Department 
University of the West Indies 
Kingston 7, Jamaica 

DESCRIPTION - This program is designed tc perform music 
on the 1620 by means of a radio placed on the console, 
as with other music programs in the library. However it 
contains many features not possessed by other programs, 
such as provision for the repetition of passages (including 
repeats within repeats) variations in tempo, and changes 
of volume and tone guality. Provision is also made for 
percussion effects using the tape punch and the typewriter, 
and for repetition of passages in a slightly modified form. 
This latter feature, together with the fact that each note 
requires only one instruction, enables pieces of 5 minutes 
duration or more to be played on a 20K machine. Rests 
can be included to any extent, and are executed by reading 
appropriate lengths of feed-code on the tape reader. The 
tone colour produced by this program approximates to that 
of a small organ, and by careful use of the above features, 
aesthetically pleasing performances of serious musical 
works can be achieved. Several source tapes for 



CONTRIBUTED PROGRAMS 
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representative nusical works are supplied with this program. 
The present repertoire is as follows. Prelude from Partita 
No. 6 for solo violin (J. S. Bach)... Solfeggietto (Ph. 
E. Bach) ... Noto Perpetuo (Paganini) ... Flight Of The 
Bumble Bee (Himsky-Korsakov) . Equipment reguired - standard 
20K tape 1620 Model I. Extra storage can be effectively 
used for long works. The program could easily be adapted 
and recompiled for use with a card machine, so as to handle 
pieces for which no rests are reguired. 

BASIC PRCGBAB PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110046 

Indicate "E N 1" in colunns 1-3 and the Progran Number 
in columns 4-13 on the IBM Progran Order Form. 



1620-11. 0.047 *H 

BOILERMAKER SUPERMARKET MANAGEMENT GAME 

AUTHOR: E. H. Babb 

DIRECT TECHNICAL INQUIRIES TO: 
E. M. Babb 

Department of Agricultural Economics 
Purdue University 
Lafayette, Indiana 

DESCRIPTION - This program simulates the narket environment 
in which supermarkets compete for sales. From two to five 
teams (players) can compete directly in a market area 
(set) . Each team makes 20 decisions which would normally 
be made or reviewed weekly. The game administrator can 
influence the market environment. The supermarket is 
departmentalized for produce, meat, groceries and dairy 
products. The game can be used to teach business planning 
techniques, economic and accounting principles or 
characteristics of the firm and the industry. Storage 
used by program - 48,592 positions. 

PROGRAMMING SYSTEMS - Written in FCBTBAN II. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Card system with TNS, 
TNF, ME, Auto Divide, Indirect Addressing, Floating Point 
hardware and 1620 Model I. Program can be recompiled on 
machine w/o specifications or program scaled down by 
reducing number or competing stores. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620110047 



CONTINUED FBOH PRIOR COLUMN 

OPTIONAL none none 



1620-11.0.049 

BOILERMAKER FARM SUPPLY BUSINESS MANA GEMENT GAME 



AUTHOR: 



E. 



Babb 



DIRECT TECHNICAL INQUIRIES TO: 
E. H. Babb 

Department of Agricultural Economics 
Purdue University 
Lafayette, Indiana 

DESCRIPTION - The program simulates the market environment 
in which farm supply businesses selling feeds and 
fertilizers compete for sales. The game administrator 
can control the environment in which teams (players) 
compete. From one to four teams can compete directly in 
a market (set) . An unlimited number of sets can be 
processed consecutively. Each team (business) makes 18 
decisions which would be normally made guarterly by a 
typical business. The game can be used to teach business 
planning techniques, economic and accounting principles 
or characteristics of the firm and the industry. Storage 
used by progran -30,706 positions. 

PROGRAMMING SYSTEMS - Written in FORTRAN II. 

HIHIMUM SYSTEM REQUIREMENTS - 1620 card system with TNS, 
TNF, HF, Auto Divide, Indirect Addressing, Floating Point 
hardware, and 1620 Model I. Progran can be recompiled 
on machine w/o specifications or program scaled down by 
reducing number of competing stores. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 
MACHINE READABLE - Appropriate 

OPTIONAL PHOGBAM PACKAGE - None. 



iaterial delivered. 



ORDERING INFORMATION: PROGRAM NUMBER 1620110049 



PROGRAM NUMBER 

EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 
REQUIREMENT 



optional none 



1620-11.0.050 

PRIME NUMBER PJMCNSTRATOR 



AUTHORS: Miss H. Giroffi 

Dr. H. J. Highland 



Mr. M. Sandberg 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USEE VOLUME 
REQUIREMENT 



none 

none 



1620-11.0.048 

BOILERMAKER DAIRY MANAGEMENT GAME 



AUTHOR: 



H. Babb 



DIRECT TECHNICAL INQUIRIES TO: 
E. M. Babb 

Department of Agricultural Economics 
Purdue University 
Lafayette, Indiana 

DESCRIPTION - This program simulates the market environment 
in which from two to four processors and distributors of 
fluid milk compete for sales on hone delivery routes and 
to stores. Each team makes 14 decisions which normally 
would be made or reviewed monthly by dairies. The game 
administrator can influence the game environment. The 
game can be used to teach business planning techniques, 
economic principles or characteristics of the firm and 
the industry. Storage used by program 42,702 positions. 

PROGRAMMING SYSTEMS - Written in FORTRAN II. 

MINIMUM SYSTEM REQUIREMENTS - 1620 card system with TNS, 
TNF, MF, Auto Divide, Indirect Addressing, Floating Point 
hardware, and 1620 Model I. Program can be recompiled 
on machine w/o specifications cr progran scaled down by 
reducing the nunber of competing dairies. 

BASIC PROGRAM PACKAGE 

tOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate naterial delivered. 

OPTIONAL PBOGBAM PACKAGE - None. 

ORDERING INFOBMATION: PROGRAM NUMBER 1620110018 



DIRECT TECHNICAL INQUIRIES TO: 
Dr. H. J. Highland 

The Brooklyn Center of Long Island University 
Computer Laboratory 
Brooklyn, N. Y. 11201 

DESCRIPTION - Program to deternine in input number is a 
prime, will accommodate any value under 1,000,000. 
Modification of the ("sieve of eratosthenes") the division 
equals remainder algorithm, is used to test for prime. 
Storage used by progran - 18989 to 19999 for symbol table 
and 8300 to 12330 for progran. 

PROGRAMMING SYSTEMS - Written in FORTRAN I with Format. 

MINIMUM SYSTEM REQUIREMENTS - Mininun 1620 20K with card 
I/O and no special features. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate naterial delivered. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620110050 



PROGRAM NUMBER 
EXTENSION 



BASIC none 
OPTIONAL none 



DXSTRIBOTXOH MEDIUM 
TYPE CODE 



DTB* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



1620^11^.0^051 

HOOSE IN THE MAZE DEMONSTRATION 



AUTHOR 



Asa C. Harvey 



PROGRAM NUMBER 
EXTENSION 



DISTRIBUTION MEDIUM 
TYPE CODE 



USER VOLUME 
REQUIREMENT 



DIRECT TECHNICAL INQUIRIES TO: 

Asa C. Harvey 
systems Analyst, 
Tri-State College 
Angola, Ind. 

DESCRIPTION - The purpose of this progran is to demonstrate 
the ability of the IBM 1620 to nake logical decisions, 
and to retain the results of each decision for future use. 
The operator sets up a maze and a (computer-mouse) finds 
its way fron the starting gate to the finish gate. The 



CONTRIBUTED PBOGBABS 



1620 



CONTINUED FBOB FBIOB PAGE 

nouse Bay then rerun the laze using the knowledge it 
obtained on the first run, etc Movenent of the nouse 
is random, therefore the nouse nay take several different 
paths for identical nazes. 

MINIMUM SYSTEM REQUIREMENTS - 1620 Hod. I, 20K memory. 
Indirect Addressing, card I/O, Auto Divide. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE READABLE - Appropriate naterial delivered. 

OPTIONAL PROGRAB PACKAGE - Bone. 

ORDER JSG INFORMATION: PBOGBAH NUMBER 1620110051 

PBOGBAB NUBBifi DISTHIEUTIOM HEDIUB USEE VOLUBE 
EXTENSION TYPE CODE BEQUIBBBENT 



CONTINUED FBOB PBIOB COLUMN 

MACHINE READABLE - None. 

OBDEBING INFORMATION: PBOGBAM NUMBER 1620110053 

Indicate "B N 1" in colanns 1-3 and the Progran Number 
in colunns 4-13 on the IBB Progran Order Form. 



1620-11.0.054 

ELEMENTAJI GERBAN-TO-ENGLISH TRANS LATION 



AOTHOR: 



Dr. R. C, 



Bead 



BASIC none 
OPTIONAL none 



DTB* 
none 



none 
none 



1620311^0.852 

HONABUS - A BDSINESS SIMULATION EXERCISE/CARD/ 



author: 



L. Brown, Jr. 



DIRECT TECHNICAL INQDIBIES TO: 
w. L. Brown, Jr. 

Eureau of Business and Economic Research 
University of Montana 
Missoula, Bont. 

DESCRIPTION - This business game has been constructed for 
use in conjunction with college courses in business policy 
or management that stress total firm operations and the 
desirability of adopting the generalist point of view. 
Bather than being a vehicle for teaching specific management 
concepts, BONABUS is directed towards developing problem 
solving ability and an appreciation for balanced decision- 
making and short and long-range planning. MONABUS sinulates 
a three-firn industry narketing a single unnaned product 
in a competitive environment. In additicn to Baking 
decisions en price, production volume, marketing and s 
6 D expenditures, and plant investnent, participants 
determine their products quality and handle company 
financing and debt payment. 

PROGBABMING SYSTEBS - Written in FOBTBAN II. 

BINIBUB SYSTEB BEQUIBEBENTS - 40K card system with Auto 
Divide, Indirect Addressing 1620 Bodel I. 

BASIC PROGRAM PACKAGE 

COCUBENTATION - Hrite-up on Microfiche only. 
BACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAB NUBBEB 1620110052 

Indicate "E N 1" in columns 1-3 and the program Number 
in columns 4-13 on the IBM Program order Form. 



1620-11.0.053 

ELEMENTARY GEHHAK-TO-ENGLISH TRANSLATION 



DIRECT TECHNICAL INQUIRIES TO: 

Dr. B. C, Bead 

University of the West Indies 

flathenatics Dept. 

Kingston 7, Janaica 

DESCRIPTION - This is a denonstration progran the purpose 
of which is to illustrate the basic ideas of machine 
translation of languages by translating elenentary German 
sentences into English. The vocabulary consists of about 
150 different words (or about 330 words if inflected forns 
of the sane word are counted separately) . The built-in 
grammar is capable of handling nany problens of wcrd-order 
and multiple meaning, and will also cope toa reasonable 
extent with such difficulties as the use of der, die and 
das as relative pronouns, and the correct handling of 
separable prefixes. This progran is not of any use for 
practical translation, and is not intended to be. It is 
for denonstration purposes only. It has, however, been 
found to be of great interest to German speakers and 
teachers, and serves to indicate the sort of way in which 
practical nachine translation of languages could be effected 
on large conputers. Specification - Basic 20K tape or 
card 1620. No special features. The program is known 
to be compatible with Indirect Addressing, and should be 
compatible with any special features. The whole of storage 
is used. The main program is in SPS, but is loaded in 
the form of a dump from 00300 in order to allow the 
multiplication table area to be used for additional storage 
(multiplication is not reguired) . The data for the program 
(glossaries, grammar, etc.) follow the main progran on 
the progran tape. 

BASIC PBOGBAM PACKAGE 

DOCUBENTATION - Hrite-up on Microfiche only. 
BACHINE READABLE - None. 

ORDERING INFORBATICN: PBOGBAB NUMBER 162011054 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBM Program order Form. 



1620-11.0.055 

NOJE/NIM ONE FILE EDUCATOR 



author: 



Kroncke 



AOTHOR: 



Dr. B. 



Bead 



DIBECT TECHNICAL INQUIBIES TO: 
Dr. R. C. Read 

University of the Nest Indies 
Mathematics Dept. 
Kingston 7, Janaica 

DESCRIPTION - This is a denonstration progran the purpose 
of which is to illustrate the basic ideas fo nachine 
translation of languages by translating elementary German 
sentences into English. The vocabulary consists of about 
150 different words (or about 330 words if inflected forms 
of the same word are counted separately) . The built-in 
grammar is capable of handling many problems of word-order 
and multiple meaning, and will also cope to a reasonable 
extent with such difficulties as the use of der, die and 
das as relative pronouns, and the correct handling of 
separable prefixes. This program is not of any use for 
practical translation, and is not intended to be. It is 
for demonstration purposes only. It has, however, been 
found to be of great interest to German speakers and 
teachers, and serves to indicate the sort of way in which 
practical nachine translation of languages could be effected 
on large conputers. The data for the progran (glossaries, 
gramaar, etc.) follow the main progran on the program deck. 

PROGRAMMING SYSTEMS - SPS. 

MINIMUM SYSTEM REQUIREMENTS - Basic 20K tape or card 1620. 
No special features. The progran is known to be conpatible 
with Indirect Addressing, and should be compatible with 
any special features. The whole of storage is used. The 
main program is in SPS, but is loaded in the forn of a 
dump from 00300 in order to allow the multiplication table 
area to be used for additional storage {multiplication 
is not reguired) . 



DIRECT TECHNICAL INQUIRIES TO: 
Prof. C. H. Davidson 
Engineering Conputing Laboratory 
University of Wisconsin 
Madison, Wisconsin 53706 

DESCRIPTION - NOPE is a progran written in FORTRAN II to 
demonstrate computer learning by the elimination of wrong 
answers. The computer plays a version of the game called 
NIM against the operator, making random choices from a 
set of possible moves. When it loses it backtracks and 
eliminates the nest recent wrong choice from the set. 
This process continues until only the best choices for 
each situation renain in the set. Output is produced at 
the end of each game to show the new collection of moves 
still contained in the set as well as a record of the game 
just played. NOPE must be run on a 1620 with 40K or more 
of memory. It must have a random number generator, such 
as the NHRAN function subprogram supplied in deck 2. 

PROGRAMMING SYSTEMS - Written in FORTRAN II. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 Bodel I with 40K or 
Bodel II card system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 162011055 

Indicate "B N 1" in columns 1-3 and the Program Number 
in colunns 4-13 on the IBB Program Order Forn. 



1620-11.0.056 
GUESS 



BASIC PROGRAM PACKAGE 

DOCUBENTATION - Write-up 



on Bicrofiche only. 



AUTHOR: D.D. Boon 

DIRECT TECHNICAL INQUIBIES TO: 
D.D. Boon 
102 Columbia Ave. 
Crisfield, Maryland 21817 

DESCBIPTION - Guess is a demonstration progran of card 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PBIOB PAGE 

game of bluffing as described in Martin Gardner's 
"mathematical Games" section of the December, 1967 
Scientific American. 

PROGRAMMING SYSTEMS - The program requires the use of the 
subroutine BAND? by Robert H. Jackson. The subroutine is 
program number 1620-07.0.071 in this catalog and is in SPS. 

MINIMUM SYSTEM REQUIREMENTS - Storage used is about 7K, 
and the eguipment required is a card system. Programming 
Type is FOBTBAH II. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up. 
MACHINE READABLE - Object code. 

OPTIONAL PROGRAM PACKAGE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620011)8056 

FBOGBAM NUMBER DISTRIBUTION MEDIUM USER VOLUME 
EXTENSION TYPE CODE REQUIREMENT 



BASIC none 
OPTIONAL none 



DTB* 
none 



none 
none 



CONTINUED FROM PBIOB COLUMN 

T. Michel 

Argonne National Laboratory 

Argonne, Illinois 

DESCBIPTIOH - Permits control of CAL-COMP 565 on-line 
plotter from FORTRAN/ format source program. 184 Positions. 
Memory 20K. Indirect Addressing- other special features 
required- CAL-COME 565 Plotter attached on-line. 
Relocatable, written in 1620/1710 SPS card system. Program 
description- Subroutine PEN is designed to give the FOBTRAN 
user direct control of the CAI COMP Plotter/s pen and drum 
movements normally available only at the machine language 
programming level. Pen also allows repetition of a movement 
up to 9999 times through the transmission of one argument. 
Or, a string of 8 successive movements may be executed. 
The accompanying SPS assembly has been made as subroutine 
no. 9 for the FORTHAN/Format computer. For another numbered 
subroutine, re-assemble with arg changed to the appropriate 
address. Pen requires 184 positions and IDA. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Hrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBEB 1620130005 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-12.3^eei 

UNIVERSAL OUTPUT SUBROUTINE 

AUTHOR: R. Davis 

DIRECT TECHNICAL INQUIRIES TO: 
R. Davis 

University of Alberta 
Computing Center 
Edmonton, Alberta 

DESCRIPTION - This program converts internally stored data 
in any standard form into any of five external formats 
and outputs them on typewriter, paper tape, or cards. 
It also simulates all the typewriter control functions. 
Card system. Indirect Addressing, move flag and transfer 
numeric fill. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGBAM NUMBER 1620123001 

Indicate "B H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



162^13-0^003 

SOUTHEASTERN UNIVERSITY TEST SCORING PROGRAM 



1620-13.0.0 



A DEMONSTRATION PROGRAM IN L OGIC TO DETERMINE THE VALIDITY 
°I A CATEGORIAL SYLLOGISM 



AUTHOR: 



V. B. Saunders 



AUTHOR: 



R. M. Obrien 



DIRECT TECHNICAL INQUIRIES TO: 
R. M. Obrien 
Computation Center 
Northeastern University 
360 Huntington Ave. 
Boston 15, Mass. 

DESCRIPTION - To grade multiple choice objective exams 
taken on mark sense cards and publish, in addition to the 
grade for each student, a grade distribution (with mean 
and standard deviation) and an analysis of the exam 
indicating how many chose each choice for each question 
and the percent of correct answers for each question. 
Maximum of 150 5-choice questions per exam. Storage 
Requirements- 19563 locations. 



DIRECT TECHNICAL INQUIRIES TO: 
N. B. Saunders 
Box 744 
Ashland, Va. 23005 

DESCRIPTION - The categorical syllogism consists of two 
premisses from which a conclusion is drawn. Its validity 
is dependent only on the arrangement of the terms and the 
types of statements asserted. This program, under sense 
switch control, will accept just the mood and figure of 
a syllogism, or accept the actual statements of the 
premisses and conclusion. The program then checks the 
types of statements and arrangement of terms against six 
rules which determine the validity of the argument. 
Equipment specifications - The program is written in SPS 
1620-1710 for a card system with Indirect Addressing and 
uses 5,549 core positions. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130008 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-13.0.010 

VARIABLE ALPHAMERIC FORMAT PLOT RELOCATABLE SUBROUTINE 



AUTHOR: 



R. F. Gates, Jr. 



PROGRAMMING SYSTEMS - Britten in 
relocatable. 



SPS. Fixed point. Not 



MINIMUM SYSTEM REQUIREMENTS - A 1620 with 20K, 1622, no 
special features required. 

*** This program has been certified by COMMON. 

BASIC PBOGBAM PACKAGE 

DOCUMENTATION - Write-up. 

MACHINE BEARABLE - Appropriate material delivered. 

OPTIONAL PROGRAM PACKAGE - None. 



ORDERING INFORMATION: PROGRAM NUMBER 1620130003 



PROGRAM NUMBER 
EXTENSION 



EASIC none 
OPTIONAL none 



DISTRIBUTION MEDIUM 
TYPE CODE 



DTR* 
none 



USER VOLUME 
REQUIREMENT 



none 
none 



DIRECT TECHNICAL INQUIRIES TO: 

R. F. Gates, Jr. 
computing Center 
university of Delaware 
Newark, Delaware 19711 

DESCRIPTION - The purpose of the subroutine is to punch 
on a card any symbol in any of its 80 columns, or to punch 
a symbol in up to all of the columns, each with its own 
symbol. The program can accept arguments for a blank card. 
The argument given is validity checked. Thus the program 
can be used to plot data points, plot and label simultaneous 
curves, produce patterns and to give FORTRAN an alphameric 
format statement which can be program controlled. 
Specifications- storage- less than 600. Equipment- Card, 
Indirect Addressing, disk if used with FORTRAN II-D. 
Programming type- Britten in SPS as a doable entry 
relocatable subroutine for FORTRAN II. A modification 
of compiler deck I is required. Written in SPS II-D as 
a double entry relocatable subroutine for FOBTBAN II-E 
for use under Monitor - I. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130010 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Proqram Order Form. 



J6 2 &z 1 3 -0^015 

CAL^COMP 565 PiOTlJB SUBROUTINE PEN FOB. FOBTRAN (FORMAT) 



AUTHOR: I. Michel 

DIRECT TECHNICAL INQUIRIES TO: 



1620-13.0.011 

SCRAMBLE - COMPUTES PREPARATION OF MULTIPLE FORM_S OF AN 
EXAMI NATI ON 

AUTHOR: Dr. H. J. Highland 



CONTRIBUTED PROGRAMS 



CONTINUED FROM PRIOR PAGE 



CONTINUED FROM PRIOR COLDMK 



DIRECT TECHNICA1 INQUIRIES TO: 
Dr. H. J. Highland 
Computer Laboratory 
Long Island University 
Brooklyn 1, New York 

DESCRIPTION - Program designed to meet needs of schools 
wherein large classes dictate need for multiple copies 
of the sane examination. Program Hill produce these 
multiple copies by rearranging the seguence of the 
examination questions. Punched card output is used to 
produce (a) teacher's copy with answer key printed next 
to each question and (b) offset master stencil used for 
printing, both of these can be produced on a 407 or similar 
model printer. Program will handle up to 50 questions, 
each of which can be up to 99 cards long. Storage used 
by program19059 to 20000. 

PROGRAMMING SYSTEMS - Written in FORTRAN with Format. 

MINIMUS SYSTEM REQUIREMENTS - A 1620 card system. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE REAEABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130011 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-13.0.012 

EXAMINATION ASSEMBLY PROGRAM 



DIRECT TECHNICAL INQUIRIES TO: 
W. S. Sekscienski 
University of Maryland 
Hind Tunnel operations Dept. 
college Park, Maryland 

DESCRIPTION - The Char Subprogram is a completely 
relocatable subprogram used in conjunction with the FORTRAN 
II, Version 2 Programming System for the IBM 1620-1627 
Card Data Processing System. This routine will annotate 
on the 1627 Plotter, the FORTRAN character set, and three 
non-standard symbols for use in point spotting of plotted 
data. The three non-standard characters for point spotting 
can be programmed in such a manner as to give a total of 
twelve separate plotting symbols. The annotation routine 
will write out the characters in various heights and in 
any one of four different directions. The character heights 
and direction of write out are variables which are in the 
call statement to this sub-program. The routine will 
annotate the 1620 character set with the exception of the 
3 and record mark characters. Maximum character size is 
10.01 inches hx5.72 inches w and minimum size is .07 inches 
hx.04 inches w. Machine Specifications - 1620 capable 
of using the FORTRAN II L Storage - 2758 digits. Language 
- 1620/1710 SPS. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Nrite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130014 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



AUTHOR: 



H. B. Kerr 



DIRECT TECHNICAL INQUIRIES TO: 

H. B. Kerr 

Computer Center 

Tennessee Polytechnic Institute 

Box 21A Tenn. Tech. 

Cookeville, Tennessee 

DESCRIPTION - This program package causes an examination 
to be made up by pulling examination guestions from a pool 
of guesticns punched into cards. A new sequence number 
is given to the guestions "pulled", and the examination 
may then be listed on ditto master on the 407 Accounting 
Machine. A maximum of 999 guestions may be contained in 
the "pool" of guestions. The guesticns may be of variable 
length with no limitation placed upon the maximum number 
of cards allowed. 

PROGRAMMING SYSTEMS - Britten in SPS. 



MINIMUM SYSTEM REQUIREMENTS 
Addressing, TNS, TNF. 



A 1620 with 20K, Indirect 



BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130012 

Indicate "E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620-13.0.013 

FORTRAN TEACH 



16 20-13^0.015 

111 DATA PROCESSING SYSTEM - AN EDUCATIONAL COMPUTER FOR 
INSTRUCTION IN BASIC PROGRAMMING 



ADTHORS: K. p. Swallow 



R. E. Gentry 



DIRECT TECHNICAL INQUIRIES TO: 
W. T. Price 
Merritt College 
5714 Grove Street 
Oakland, California 94609 

DESCRIPTION - The 141 Data Processing System is an 
educational tool for teaching basic computer concepts 
through a 1401 type machine language and 1401 SPS. The 
141 simulator set of basic 1401 instructions includes- 
SB, CB, R r P, B, MCB, LCA, CS, B, C, A, S, H, and NOP. 
This set is sufficient to illustrate such concepts as- 
(1) reading, punching, and printing, (2) looping for 
iterative processes, (3) seguence checking, (4) counted 
loops, <5) program switches, (6) load routines, (7) address 
modification, (8) subroutines and subroutine linkages, 
etc. Basic utility routines are incorporated in the 141 
simulator for easy debugging of 141 programs. 141 written 
snbroutines are provided for multiplication, division, 
zero suppression, and editing. The 141 SPS Assembler 
processes the 141 set of instructions and all 1401 pseudo 
operations including- DCW, DC, DS, DSA, ORG, EX, and END. 
Storage used by program - 20,000 positions of storage. 

Equipment required by program- Basic 1620 card system. 
Programming type- SPS - 1620/1710. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 



AUTHOR: Prof. B. L. Pope 

DIRECT TECHNICAL INQUIRIES TO: 
Prof. W. L. Pope 
Computer center 
Otah State University 
Logan, Btah 84321 

DESCRIPTION - FORTRAN TEACH is a set of programs and student 
problems designed for use during the early part of a course 
teaching EORTRAN programming. They enable the student 
to get something on the machine before he can write a 
complete program, and they assist the instructor in checking 
the problems. 

PROGRAMMING SYSTEMS - FORGO. 

MINIMUM SYSTEM REQUIREMENTS - Card system, 40K core minimum. 
These programs are written in FORTRAN for the FORGO 
processor. Programming type: Mainline, complete. 

BASIC PROGRAN PACKAGE 

DOCUMENTATION - write-up 'on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130013 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



1620-13 .0.014 

CHAR ANNOTATION SUBPROGRAM 



OfiDERING INFORMATION: PROGRAM NUMBER 1620130015 



Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 en the IBM Program Order Form. 



1620-13.0.016 

IHI 2*TA PROCESSING SYSTEM - AN EDUCATIONAL COMPUTER FOR 
INSTRUCTION IN BASIC PROGRAMMING 



AUTHORS : 



Swallow 



R. E. Gentry 



B. S. Sekscienski 



DIHECT TECHNICAL INQUIRIES TO: 
W. T. Price 
Merritt College 
5714 Grove Street 
Oakland, California 94609 

DESCRIPTION - The 141 Data Processing System is an 
educational tool for teaching basic computer concepts 
through a 1401 type machine language and 1401 SPS. The 
141 simulator set of basic 1401 instructions includes- 
SW, CB, R, P, B, HCW, LCA, CS, B, C, A, S, H, and NOP. 
This set is sufficient to illustrate such concepts as- 
(1) reading, punching, and printing, (2) looping for 
iterative processes, (3) sequence checking, (4) counted 
loops, (5) program switches, (6) load routines, (7) address 
modification, (8) subroutines and subroutine linkages, 
etc. Basic utility routines are incorporated in the 141 
simulator for easy debugging of 141 programs. 141 written 
subroutines are provided for multiplication, division, 
zero suppression, and editing. The 141 SPS Assembler 
processes the 141 set of instructions and all 1401 pseudo 
operations including- DCS, DC, DS, DSA, ORG, EX, and END. 
Storage used by program - 20,000 positions of storage. 



CONTRIBUTED PROGRAMS. 
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Equipment required by program- 1620, 1622, and 1443. 
Programming type- SPS - 1620/1710. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
NACHIHE RBADABLB - Hone. 

OBDEBIHG INFOBHATION: PBOGBAH NUMBEB 1620130016 

Indicate "E N 1 H in columns 1-3 and the Program Runner 
in columns 4-13 on the IBM Progran Order Form. 



J620 = J3.£.aj7 

141 DATA P50CESSIHG SYSTEM - AH EDDCATIOSAL COMPOTEB FOB 
INSTRUCTION IH BASIC PRO GRAM MING 



AUTHORS: K. p. Swallon 



B. E. Gentry 



DIRECT TECHNICAL INQUIRIES TO: 
W. T. Price 
Merritt College 
5714 Grove Street 
Oakland, California 94609 

DESCBIPTIOH - The 141 Data Processing system is an 
educational tool for teaching basic computer concepts 
through a 1401 type machine language and 1401 SPS. The 
141 simulator set of basic 1401 instructions includes- 
SW, CD, R, P, H, NCR, LCA, CS, B, C, A, S, H, and NOP. 
This set is sufficient to illustrate such concepts as- 
(1) reading, punching, and printing, (2) looping for 
iterative^ processes, (3) sequence checking, (4) counted 
loops, (5) program switches, (6) load routines, (7) address 
modification, (8) subroutines and subroutine linkages, 
etc. Basic utility routines are incorporated in the 141 
simulator for easy debugging of 141 programs. 141 written 
subroutines are provided for multiplication, division, 
zero suppression, and editing. The 141 SPS Assembler 
processes the 141 set of instructions and all 1401 pseudo 
operations including- BCW, DC, DS, DSA, ORG, EX, and END. 
Storage used by program - 20,000 positions of storage. 
Equipment required by program- 1620, 1622, 1311, and 
Indirect Addressing. Programming type - SPS II-D. 

BASIC PBOGBAH PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

OBDEBIHG INFORMATION: PBOGBAH HUMBEfi 1620130017 

Indicate "E H 1" in columns 1-3 and the Progran Number 
in columns 4-13 on the IBM Program Order Form. 



1620-13.0.018 

1$1 DATA PROCESSOR SYSTEM - AN EDUCATIONAL COMPUTER FOR 
INSTRUCTION IN BASIC PROGRAMMING 



authors: K. p. Swallon 



B. E. Gentry 



DIRECT TECHNICAL INQUIRIES TC: 
a. T. Price 
Merritt College 
5714 Grove Street 
Oakland, California 94609 

DESCBIFTION - The 141 Data Processing System is an 
educational tool for teaching basic computer concepts 
through a 1401 type machine language and 1401 SPS. The 
141 simulator set of basic 1401 instructions includes- 

SW, CS, E, P, H, HCW, 1CA, CS, B, C, A, S, H, and NOP. 

This set is sufficient to illustrate such concepts as- 
(1) reading, punching, and printing, (2) looping for 
iterative processes, (3) seguence checking, (4) counted 
loops, (5) program switches, (6) load routines, (7) address 
modification, (8) subroutines and subroutine linkages, 
etc. Basic utility routines are incorporated in the 141 
simulator for easy debugging of 141 programs. 141 written 
subroutines are provided for multiplication, division, 
zero suppression, and editing. The 141 SPS Assembler 
processes the 141 set of instructions and all 1401 pseudo 
operations including- DCH, DC, DS, DSA, CBG, EX, and END. 
Storage used by program - 20,000 positions of storage. 
Equipment required by program- 1620, 1622, 1443, 1311, 
and Indirect Addressing. Programming type - SPS II-D. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - write-up on Microfiche only. 

MACHINE READABLE - None. 

ORDERING INFORMATION: PBOGHAM NUMBER 1620130018 

Indicate M E H 1" in columns 1-3 and the Program Number 
in columns 4-13 on the .IBM Progran Order Form. 



1620^13.0^026 

A COMPUTER PROGRAM TO POWER-BATCH TEA BS IN J DEBATE 
TOUR HAME NT 



CONTINUED FBOM PBIOB COLUMN 

DESCRIPTION - This program processes the results of a 
debate tournament and assigns opponents, judges, and rooms 
for each round. Matches are made so that- (1) As far as 
possible, teams debate teams of egual ability; (2) A team 
does not debate the same side of the issue in successive 
rounds; (3) Teams never debate each other more than once; 
And (4) Teams from the same district never debate each 
other. In addition, a list of teams in order by win-loss 
ratings is produced and input cards to the next rcunds 
processing are produced. 

PBOGBAHMIHG SYSTEMS - written in SPS - 1620/1710. 

MIHIMOH SISTER REQUIREMENTS - A 20K 1620 card system. 

BASIC PBOGBAH PACKAGE 

DOCUMEHTATION - Write-up on Microfiche only. 
HACHIHE READABLE - Hone. 

OBDEBIHG IHPOBHATIOH: PROGRAM NUMBER 1620130026 

Indicate n B N 1 M in columns 1-3 and the Progran Number 
in columns 4-13 on the IBM Program order Form. 



1620-13.0.027 

STUFF OUTPUT EDITOR 

AUTHOB: E. Satterthwaite 

DIRECT TECHNICAL INQUIRIES TO: 
E. Satterthwaite 
University of Delaware 
Computing Center 
Newark, Del. 19711 

DESCBIPTIOH - Program accepts as input an entire output 
deck of the STUFF program and edits all numeric data into 
POBTRAH-like B- or F-fields. All heading cards are also 
reproduced in the output. Field specifications for the 
numeric data are supplied by FOBTRAN-like Format cards. 
Separate fornats are allowed for phase 1-7 and for phase 
9 stuff output, storage used- 6328 core positions. 



Written in SPS-1620/1710, mainline. 



PROGRAMHIHG SYSTEMS 
complete. 

MIHIMUH SYSTEM BEQUIBEMEHTS - A 1620 card system, 
TNS/TNF/HF, Indirect Addressing. These are minimum 
reguirenents and cannot easily be removed. 

BASIC PROGBAM PACKAGE 

DOCUMENTATION - Write-up on Microfiche only. 
MACHINE BEADABLE - None. 

ORDERING INFORMATION: PROGRAM HUMBER 1620130027 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Progran Order Form. 



1620zJ3.0.028 

MIIIRSITY OF MISSISSIPPI TEST SCORING PROGRAM - JMTS 



AUTHOR: 



Richard D. Ross 



DIRECT TECHNICAL IHQUIRIES TO: 
Richard D. Ross 
Director 

Computer Center, Carrier 103 
University of Mississippi 
University, Mississippi 

DESCRIPTION - UMTS is a flexible means of scoring objective 
exams taken on mark sense cards. A numerical grade for 
each student is published along with a grade distribution 
(with mean and standard deviation) and an exan analysis- 
indicating how many choices per question. UMTS has a 
maximum range of 500 5-choice questions (10 cards) per 
exan with nultiplicity of correct answers permitted. In 
addition, each question nay be weighted with a weight value 
from 1 to 5. UMTS also permits batch processing. To grade 
150 questions takes approxinately 1 1/2 seconds. No special 
instructions are required, although TNF and/or Direct 
Divide can be used on computers that have these 
capabilities. The maximum number of questions that may 
be graded is 150 questions for 20K computers and 500 
guestions for 40K computers. 

PROGRAMMING SYSTEMS - SPS Language Processed by AFIT SPS 
(Progran Nunber 1620-01.1.023). 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, 1622. No special 
instructions are reguired but Indirect Addressing is 
required. Memory 40K can be used if available. 

BASIC PROGBAM PACKAGE 

DOCUMEHTATION - Write-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130028 



ADTHOR: 



Mr. Peter Wells 



DIRECT TECHNICAL INQUIRIES TO: 
Mr. Peter Wells 
5415 S.w. 19th Dr. 
Portland, Oregon 97201 



Indicate "I 
in columns 



N 1 n in columns 1-3 and the Progran Nunber 
4-13 on the IBM Program Order Form. 



CONTRIBUTED PROGRAMS 



1620-13.0.031 

UNIVERSITY OF MISSISSIPPI TEST SCORING PROGRAM 



AUTHOR: 



Richard D. Ross 



DIRECT TECHNICAL INQUIRIES TO: 

Mr. Richard D. Ross, Director 
Conputer Center, Carrier 103 
University of Hississippi 

University, Hississippi 

DESCRIPTION - This is a flexible means of scoring objective 
exams taken on mark sense cards. It features a card input 
and card output patterned after program nunber 13.0.028 
by the sane author. A nunerical grade for each student 
is published along with a grade distribution (with mean 
and standard deviation) and an exan analysis — indicating 
how nany choices per question. UMTS has the following 
additional features - 

1- Allows multiplicity of correct answers. 

2- Allows each answer to be weighted with a weight value 
from 1 to 5. 

*3- Allows omitted question numbers to be punched following 

the students grad card. 
*4- Allows weight factor to be punched beside each guestion 

number on exam analysis output.. 

5- Allows identification to be punched in columns 76-80 of 
students grade card. 

6- Allows additional identification to te punched in 
columns 01-30 of first header card. 

*7- Allows blank cards to be read at any tine. 

8- Allows all key cards, alternate key cards, and weight 
cards to be read in random order. 

9- Allows student answer cards to be read in random order. 
10- Allows batch processing. 

*- Indicates additions to program number 13.0.028. 

Because of the additions to program number 13.0.028 a 
maximum of 130 questions can be graded on 20K computers, 
485 guestions on 40K and 500 questions for 60K conputers. 
No special instructions are required although TNF and/or 
Direct Divide can be used on computers that have these 
capabilities. The naximun number of questions that may 
be graded is 130 questions for 20K computers, 485 for 40K 
computers, and 500 questions for 60K computers. 

PROGRAMMING SYSTEMS - Britten in SPS Language processed 
by AFIT SPS (Program Number 01.1.023). Fixed Point and 
non-relocatable. 

MINIMUM SYSTEM REQUIREMENTS - Memory 20K, 1622. No special 
instructions are required but Indirect Addressinq is 
required. Memory 40K ana 60K can be used if available. 
Runninq time is 1 1/2 seconds for 150 guestions and 4 
seconds for 500 questions. This program is written to 
handle 25 mark sense columns and split them in half putting 
questions 1-25 in the 9 to 5 positions and questions 26- 
50 in the a to positions. Each answer must be punched 
in a separate column for the computer so that a half-after- 
four time pick up was added to the nark sense punch to 
pick up ccselectors and punch each question in a separate 
column. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130031 

Indicate **E N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Form. 



HI ISEOJM_.AT.ION BJTBIEVAL 



AUTHOR: 



E. Bean 



DIRECT TECHNICAL INQUIRIES TO: 
C.E. Bean 

Louisiana Polytechnic Inst. 
Computing Ctr. 
Huston, La. 71270 

DESCRIPTION - This is a series of programs to store up 
to 32 keywords concerning a specific reference in such 
a manner that the reference is associated with each word. 
Later use of these words in a search request then causes 
retrieval of this reference. The entire system is operable 
on a 20K machine. The size of the library to about 500 
documents on a 20K nachine, the search proqram nay use 
all available core. This restricts 2000 on 40K, and 4000 
on a 60K machine. 

PROGRAMMING SYSTEMS - SPS-IID was used for convenience. 
Object decks were obtained using 1710 SPS. The SPS-IID 
B7 and BB2 commands were converted to their 1710 SPS 
equivalents by a FORTRAN program included in the listings. 

MINIMUM SYSTEM REQUIREMENTS - A 1620 Model 1, 18K, with 
Card I/O and 1 disk file; TNS, TNF, MF X and Indirect 
Addressing. Reguirenents which can be easily renoved are 
TNS-TNF. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 



CONTINUED FROM PRIOR COLUMN 

ORDERING INFORMATION: PROGRAM NUMBER 1620130032 

Indicate "B N 1" in colunns 1-3 and the Program N 
in columns 4-13 on the IBM Program Order Forn. 



1620 z ll_.0_.033 

HjOTTER'jI 10x1101 

AUTHOR: A. P. Brisken 

DIRECT TECHNICAL INQUIRIES TO: 

A.F. Brisken 
Dept. of Physics 
Saint Louis University 
221 N. Grand Blvd. 
Saint Louis, Mo. 63103 

DESCRIPTION - The card output of this program is listed 
to make a plot of the entered data with respect to tine 
(narked off in hcurs, minutes, and seconds) . There are 
110 vertical and horizontal increments (or intervals) every 
10th and 20th increment, respectively, being labeled. 
All the data points, positive values only, are tested with 
respect to time to determine the proper time interval, 
and once all the points for a tine interval have been 
accunulated, the average value and the probable error of 
the average are calculated. Then, the conputer scans the 
vertical increments horizontally and substitutes the average 
and probable error symbols where appropriate. After the 
plot has been punched, a statistics of the plot can also 
be punched. Due to the very nature of this program, namely 
the averaging techniques, only single valued functions 
can be plotted. Also, to get a true representation of 
the data, the cards must be in an order such that time 
increases monotonically. This program contains three 
options. If a different synbol (other than a period) is 
needed for the plot, then it must be entered in the 
appropriate place and Sense Switch 1 must be on. If error 
bars are reguired {to indicate the precision of the average 
point). Sense Switch 2 must be on. If a statistics of 
the plot is desired. Sense Switch 3 must be on. (Any 
combination of Sense Switch settings is allowed). 

MINIMUM SYSTEM REQUIREMENTS - A 1620 Model I card systen 
with 56160 positions of storage. Indirect Addressing, Auto 
Divide, 1622, 1623 and any printer which lists with keys 
81-120. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 16201*10033 

Indicate "B N 1" in columns 1-3 and the Program Number 
in columns 4-13 on the IBM Program Order Forn. 



16 20-1 3.0.034 

TABULATE NUMERIC DAT A DECKS ON 1443 PRINTER 

AUTHOR: A.R. Eckert 

DIRECT TECHNICAL INQUIRIES TO: 
A.R. Eckert 

Dept. of Agricultural Economics 
University of Nebraska 
Lincoln, Nebr. 68503 

DESCRIPTION - Field and sign flags are cleared to avoid 
letters in lieu cf nunbers. On the page a sign column 
precedes and separates data fields that are designated 
to be printed. Signflags may be read either from the 
rightmost or leftmost columns of the card fields. Plus 
signs and high position zeros become blanks. A zero in 
the unit positions of empty data cells is optional. 
Printing is omitted for card columns that are designated 
to become blanks. Limitations- The sequence of printed 
fields is deternined by the order of the card columns. 
It is not possible to place higher columns before lower 
columns. On a 120 space/line printer the maximum of 
separated fields is 60. Storage used- 2135 positions. 



Relocatable 12- 



PROGRAMMING SYSTEMS - Machine Language, 
module, self-restoring. 

MINIMUM SYSTEM REQUIREMENTS - IBM 1620 Model 1, Indirect 
Addressing; TNF, MF, cards, 1443 Printer. 

BASIC PROGRAM PACKAGE 

DOCUMENTATION - Brite-up on Microfiche only. 
MACHINE READABLE - None. 

ORDERING INFORMATION: PROGRAM NUMBER 1620130034 



Indicate M B 
in colunns 



» 1" in columns 1-3 and the Program Number 
-13 on the IBM Program Order Form. 



1620-13.0.035 

MINIMIZATION AND STATE IDEJTJFICATION OP AUTOMATA 



Hota S. Sarma 



DIRECT TECHNICAL INQUIRIES TO: 

Hota s. Sarma, Instructor 



GC20-1 603-10 



CONTRIBUTED PBOGEABS 



CONTINUED FBCB PBIOB PAGE 

School of Engineering 
Tuskegee Institute 
Tuskegee, Ala. 

DESCRIPTION - The purpose of this project is to design 
a computer program, (A) To produce the minimal form of 
a given machine and (B) To find the present diagnosing 
and homing input sequences for identifying the initial 
and final states of the minimal form of the given machine. 
The number of states in the automation to be analyzed is 
limited to 20 and the number of input symbols is limited 
to 5. 

PBCGBABBING SYSTBHS - Britten in F0BTBA8 Language. 

binibob ststes eequieebents - a 60k ibh 1620 using the 
Por-To-Go Compiler with the input and the output at the 
typewriter. The program also reguires Auto Divide, Indirect 
Addressing and a 1443 Printer. 

BASIC PBOGBAB PACKAGE 

D0C0BEHTATIOH - Vlrite-up on Bicrofiche only. 

BACHINE READABLE - Bone. 

ORDERING INFORBATION: EROGRAB NtJBBEB 1620130835 

Indicate "E S 1 n in columns 1-3 and the Program Number 
in columns 4-13 on the IBB Program Order Form. 



1620=13^0.^36 

CAST z S21SSSJJ! ASSISTED TEST SCOBIBG 

AOTEOB: D. Eschbach, Jr. 



T) 

DIBECT TECBNICAL ISOOIBIES TO: § 
D. Eschbach, Or. 

University of Toledo, 3 

Toledo, Ohio St 

-♦* 

DESCBIPTIOH - This is a test scoring program which gives O 

a reference for the student to read for each incorrect _ 

answer. Iten analysis and freguency distributions are 01 

also generated for the instructors use. The program was S 

developed to show seme methods of computer assistance in _* 

teaching. 05 

PECGEABBIBG SISTEBS - FOBTBAB II-D. J? 

BIHIBOB SYSTEfl BEQDIBEBENTS - 40K 1620 card-disk file -» 

system. The program can easily be expanded to take ^[ 

advantage of a printer. O 

BASIC PBOGBAB PACKAGE 5 

DOCUBEBTATIOH - write-up on Bicrofiche only. (/> 
MACHINE EEADABLE - None. 

OBDEBIBG IHFOBHATIOH: FBOGRAB NDHEER 1620130036 5' 

8 

Indicate "B N 1" in columns 1-3 and the Program Number Q. 

in columns 4-13 on the IBB Program Order Form. — • 
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YOUR COMMENTS PLEASE... 

Your comments on the other side of this form will help us improve future editions of this pub- 
lication. Each reply will be carefully reviewed by the persons responsible for writing and pub- 
lishing this material. 

Please note that requests for copies of publications and for assistance in utilizing your ibm 
system should be directed to your ibm representative or the ibm branch office serving your 
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fold 



fold 



FIRST CLASS 
PERMIT NO. 62 
HAWTHORNE, N.Y. 



BUSINESS REPLY MAIL 

NO POSTAGE STAMP NECESSARY IF MAILED IN THE UNITED STATES 



POSTAGE WILL BE PAID BY . . . 

I BM Corporation 

40 Saw Mill River Road 

Hawthorne, New York 10532 




Attention: Program Information Department, Catalog of Programs 



fold 



fold 



& 

o 



00 

O) 

M 
O 

E° 

— * 

o 

o 

-o 
-1 

5' 

» 
a 

5' 

C 

w 

>' 

o 

s, 

o' 



International Business Machines Corporation 
Data Processing Division 
112 East Post Road, White Plains, N.Y. 10601 
[USA Only] 

IBM World Trade Corporation 

821 United Nations Plaza, New York, New York 10017 

[International] 



